Информатика 8 класс
Ввод/вывод данных в

program prim;

var i,x : integer;

begin

x: =1;

for i: =1 to 5 do

begin write (x,'   ');

x: =x+2;

end;

end. 

на один символ отводится 1 байт 30 строк по 70 символов - 2100 символов 5 страниц-это 10500 символов так что ответ 10500 байт

т.к рисунок состоит из  1310720  пикселей, следовательно чтобы получить такую цифру нужно найти произведение двух чисел, которые больше 1000, т.к. 1000*1000=1000000, следовательно, разрешение экрана наиболее близкое к данному : 1280 на 1024, т.к. 1280*1024=1310720 и это ближайшие числа к 1000

var a: array[1..100,1..100] of integer;

i,j,n,min: integer;

begin

  read(n);

  min: =maxint;

  for i: = 1 to n do

      for j: = 1 to n do begin

          read(a[i,j]);

          if abs(a[i,j])< abs(min) then min=a[i,j];              

      end;

  for i: = 1 to n do begin

      for j: = 1 to n do begin

          a[i,j]: =a[i,j] + min

          write(a[i,j]);          

      end;

      writeln;

  end;  

end.