Посчитайте количество целых чисел в диапазоне от 60(8) до 100(8) включительно

100(8) - 60(8) + 1 = 21(8) = 17(10).

var

x,y: real;

begin

readln(x);

y: =7*sin(x)*sin(x)-0.5*cos(x);

writeln(y);

end.

количество кбайт умножаете на 1024 получаете количество символов 3,5*1024=3584