Информационный объем изображения I=k*i, где к- количество точек, i- глубина цвета.
Глубина цвета определяется из формулы N=2^i, где N-количество цветов
i=㏒₂N= ㏒₂256= 8 бит
k=25*25= 625
I=625*8= 5000 бит
5000 бит/8= 625 байт
Var
a,d,i:integer;
begin
readln(a,d);
for i:=1 to 8 do
begin
writeln('in ',i,' hour = ',a);
a:=a+d;
end;
end;
8 умнож на 5 и умнож но 10