как решить эту таблицу​

4 клетки вниз и 7 вправо                                                                                                                           

var

x,y: real;

i,n: integer;

begin

n: =1;

x: =1;

y: =1;

for i: =1 to 5 do

begin

n: =n*i;

x: =-1.5*x;

y: =y*(x+1/n);

end;

writeln(y: 15: 5);

end.

16 цветов=4 бита/пиксель

640*250=160000 пикселей — размер изображения

160000*4=640000 бит = 80000 байт.

var x,y: integer;

begin

readln(x);

if x< 1 then y: =-2*x+11

else y: =x*x-2;

writeln(y);

end.