26 Mayıs 2013 Pazar
Proje [Görüntü Temizleme]
#include <stdio.h>
#include <stdlib.h>
int main(){
int i,j,k;
int p=1;
float *x2,*sonuc2,*farklar2,*toplamlar2;
char bosluk=' ';
int c,d;
float l;
char a[6]={0};
int b=0;
char o[]="ozkan";
FILE *ptr, *ptr2;
ptr=fopen("d:\\kemal2.txt","r");
if(ptr==NULL)
printf("Dosya Yok");
else{
fscanf(ptr,"%s",&a);
printf("%s\n",a);
while(getc(ptr) != '\n');
fscanf(ptr,"%d",&d);
printf("%d\n",d);
while(getc(ptr) != '\n');
fscanf(ptr,"%d",&c);
printf("%d\n",c);
while(getc(ptr) != '\n');
x2=(float *)calloc(d,sizeof(float));
for(i=0;i<d;i++){
fscanf(ptr,"%f",&l);
x2[i]=l;
printf("%f\n",x2[i]);
}}
fclose(ptr);
sonuc2=(float *)malloc(d*sizeof(float));
farklar2=(float *)calloc(d,sizeof(float));
toplamlar2=(float *)malloc(d*sizeof(float));;
printf("\n\n\n");
while(p!=d){
for(i=0,j=0;i<d/p,j<d/(2*p);j++){
sonuc2[j]=(x2[i]+x2[i+1])/2;
i=i+2;
}
for(j=d/(2*p),i=0;i<d/p,j<d/p;j++){
sonuc2[j]=(x2[i]-x2[i+1])/2;
i=i+2;
}
p=p*2;
for(i=0;i<d;i++)
x2[i]=sonuc2[i];
}
for(i=0;i<d;i++){
printf("%f\n",x2[i]);
}
printf("Mutlak degeri kactan kucuk olanlari 0 lamak istiyorsunuz?");
//scanf("%d",&k);
k=c;
for(i=1;i<d;i++){//sonuc2[0]= toplamın yarısı ; geri kalan hepsi fark olduğu için i=1 den başlamıştır.
if(sonuc2[i]<0)
sonuc2[i]*=(-1);
if(k>sonuc2[i]){
sonuc2[i]=0;
x2[i]=sonuc2[i];}
}
for(i=0;i<d;i++){
sonuc2[i]=x2[i];
}
for(i=0;i<d;i++){
printf("%lf\n",sonuc2[i]);
}
printf("\n\n\n");
p=d;
while(p!=1){
for(j=0,i=0;i<d;j++){
toplamlar2[j]=sonuc2[i]+sonuc2[i+(d/p)];
i=i+1;
}
for(j=0,i=0;i<d;j++){
farklar2[j]=sonuc2[i]-sonuc2[i+(d/p)];
i=i+1;
}
for(i=0,k=0;i<d/(p/2);k++){
sonuc2[i]=toplamlar2[k];
sonuc2[i+1]=farklar2[k];
i=i+2;
}
p=p/2;
}
for(i=0;i<d;i++){
printf("%f\n",sonuc2[i]);
}
ptr2=fopen("d:\\ozkan.txt","w+");
if(ptr2==NULL){
printf("Dosya Yok");
}
else{
fprintf(ptr2,"%s\n",o);
fprintf(ptr2,"%d\n",d);
printf("%d\n",d);
for(i=0;i<d;i++){
fprintf(ptr2,"%.6f%c",sonuc2[i],bosluk);
}
}
fclose(ptr2);
free(x2);
free(toplamlar2);
free(farklar2);
free(sonuc2);
}
Kaydol:
Kayıt Yorumları (Atom)
Hiç yorum yok:
Yorum Gönder