Запиши основной алгоритм ,с которого будет нарисован индекс 600660

5 бит, т.к. 32=2 в пятой степени

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.

2000*2000=4000000 пикселей=4 мегапикселей

var x1,x2,x3,x4,x5: integer;

s: real;

begin

  read(x1,x2,x3,x4,x5);

  s: = (x1+x2+x3)/(x4+x5);

  if round(s)=s then writeln("celoe - "s);

end.