Напишите программу для изображения грузовик

2*3=6

512*128*6=393216

393216: 1024=384кб

необходимо (но не достаточно).

v=24*640*480 = 7372800 бит.

737200: 8 =   байт.

921 600: 1024 = 900 кб

900: 1024 = 0,88 мб

2 мб : 0,88 мб = 2,28.

количество страниц : 2

var a: array[0..10] of integer;

i,x: integer;

begin

  read(x);

  randomize;

  for i : = 1 to 10 do begin

      a[i]: =random(4);

      if a[i]=x then writeln('a[',i,']');

  end;

end.