/i/Yazılım

Umuyoruz ki geleceğin yazılımcıları bu altinciden çıkacak!
    başlık yok! burası bom boş!
  1. 26.
    +1
    Octave
    clc
    N=input('N:');
    y=0;k=0;xt=0;
    for i=1:N
    x(i)=input('xi gir');
    y=x(i)+y;
    xo=y/N;
    end;
    for i=1:N
    if x(i)>xo;
    xt=x(i)+xt;
    k=k+1;
    end
    end
    x2o=xt/k;
    fprintf('ortalamadan buyuk sayıların toplamı:%dn',xt);
    fprintf('Sayıların ortalaması:%dn',xo);
    fprintf('Sayıların toplamı:%dn',y);
    fprintf('Ortalamadan buyuk sayıların ortalaması :%3dn',x2o);
    fprintf('Ortalamadan buyuk sayıların adedi:%dn',k);
    ···
   tümünü göster