Растровое изображение размером 64на 64 пикселя содержит в палитре 65536 цветов какой объем памяти необходимо для хранения для сохранения этого изображения

program exapmle2; var x,y,k: integer; begin writeln('эта программа определяет, число соседств чисел с одинаковыми знаками'); write('введите число: '); read(x); y: =x;

write('введите число: '); //добавить эти 2 строки read(x);

k: =0; while x< > 0 do // поменять у на х begin //if x*y< 0 then inc(k); убрать эту строку if x*y> 0 then inc(k); y: =x; read(x); // изменить у на х end; writeln(' число соседств ',k); writeln('нажмите enter для завершения работы программы'); readln; end.

var //это ключевое слово показывает что началось объявление переменных  b, i: integer;   //тут показали что переменные b, i  типа integer т.е. целые  summ: real; {тут показали что переменные summ  типа real т.е. дробная в ней будет хранится наша сумма} begin // это слово показывает на начало выполнения программы  summ : = 0;   //присваиваем начальное значение суммы  write('b = '); readln(b);   //выводим на экран 'b = ' и считываем b  for i : = 1 to b do {повторяем следующую операцию b раз причем каждый раз i будет увеличиваться на 1 изначально i присваивается 1}      summ : = summ + i * i / 2; {присваиваем сумме ее же значение плюс сразу  квадрат переменной i деленный на 2}  writeln('s = ', summ); //выводим 's = ' и за ним сразу значение суммы  readln; //ожидаем нажатия клавиши enterend. //конец выполнения программы