C ile Betimsel istatistikler

/*Betimsel istatistikler*/
#include <stdio.h>
#include <math.h>
#define boyut 1000
main()
{
int n,i,j;
float t,a,dizi[boyut],max,min,gen;
float var,ort,ss,med,vr;
clrscr();
printf("dizinin eleman sayisi=");
scanf("%d",&n);
printf("Elemanlari giriniz=\n");
for (i=1;i<=n;i++)
{
printf("%d ",i);printf(". eleman= ");
scanf("%f",&dizi);
}
/*siralama*/
for(i=1;i<n;i++)
for(j=i+1;j<n+1;j++)
if(dizi>dizi[j])
{
a=dizi;
dizi=dizi[j];
dizi[j]=a;
}
printf("Sirali hali\n");
for(i=1;i<=n;i++)
printf("%f",dizi);
printf("\n");
/*max,min*/
max=dizi[n];min=dizi[1];gen=max-min;
printf("maximum=%f\n",max);
printf("minimum=%f\n",min);
printf("genislik=%f\n",gen);
/*ortalama,varyans,ss*/
for(i=1;i<=n;i++)
t=t+dizi;
ort=t/n;
for(i=1;i<=n;i++)
vr=vr+pow((dizi-ort),2);
var=vr/n-1;
ss=sqrt(var);
printf("ortalama=%f\n",ort);
printf("varyans=%f\n",var);
printf("standart sapma=%f\n",ss);
/*ortanca*/
if(pow(-1,n)<0)
med=dizi[(n+1)/2];
else med=(dizi[n/2]+dizi[(n+2)/2])/2;
printf("ortanca=%f\n",med);
getch();
}