Звезда не активнаЗвезда не активнаЗвезда не активнаЗвезда не активнаЗвезда не активна
 
%script
filename = "sine.txt";
fid = fopen (filename, "w");

for x = 1:1:4000
y(x) = floor(199*sin(x*pi/4000));
fprintf(fid,'%d,', y(x));
if rem(x,20) == 0
     fprintf(fid,'\n');
end
end
fclose (fid);