Program n1;
var n: integer;
begin
readln(n);
if n<>0 then
begin
if n<0 then writeln(n*n) else writeln(n*n*n);
end;
end.
1) 2°i=16
i=4 бит/пиксель
128*1024=131072(пикс) картинка
131072*4=524288(бит)
524288 бит=65536 байт=64 килобайт
Ответ: 64 килобайта
Ответ: 593 Мбайт
16 млн. можно закодировать 3 байтами
720*576 = 414720 пикселей на кадр
414720*3 =1244160 байт на кадр
20*25 = 500 кадров
1244160*500 = 622080000 байт = 607500 Кбайт = 593 Мбайт