Для создания и редактирования графического изображения
Ты перепутала. Это в 1 Килобайте 1024 БАЙТА, а в 1 байте - 8 бит. Также в 1 Кб - 8192 бита.
Для кодирования символа используется 8 бит? То это правильно
1500*40*60*8= 150*40*60*8 /8= 150*40*60 =
150*40*60 / 1024 Кбайт = 351,5625 Кбайт = 351,5625/1024 Мбайт ≈ 0,35 Мбайт.
Program z;
var n,p,i:integer;
begin
write('n=');
readln(n);
p:=1;
if n mod 2=1 then i:=1 else i:=2;
while i<=n do
begin
p:=p*i;
i:=i+2;
end;
writeln(n,'!!=',p);
end.