Рисунок размером 768 на 96 пикселей создан с использованием палитры из 8 цветов. сколько килобайт занимает в памяти рисунок без учёта сжатия?

program qwerty; uses crt; var a: real; beginclrscr; writeln('введите количество миль'); readln(a); a: = a*1.6; writeln('кол-во киллометров - ',a: 2: 2); readkey; end.

1.

var n: integer; begin  cls;   for n: =1 to 10 do begin    write('n=',sqr(n)+5,' ');   end; end.

решить на паскале?