filename='leika.txt';
fp = fopen(filename,"r");
zb = fscanf(fp,'%f');
fclose(fp);