Максат нарисовал изображения цветов для реферата по биологии. Данные изображения одного цветка требует 10Кб памяти. Размер каждой ячейки ОЗУ равен 10Кб. Осталось свободное место , сможет ли Максат разместить в свободном месте рисунок размером 40000 байт ЭТО СОР​

(63+12): 3=25

(39-18)*4=84

750-12: 3=746

420+9*6=474

64*48*12*8=294,912- обьем в байтах 1 стр

var

  i,n,a: integer;

begin

  readln(n);

for i: =1 to n do

begin

  read(a);

if (a mod 3=0)and(a mod 5> 0) then write(a,' ');

end;

writeln;

end.

var

x,y: real;

begin

readln(x);

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

writeln(y);

end.