2048 бит
рофырфыорфлыорвлфоыр
2i=N
2i=256
I
i=8 бит, (1 байт)
4*1=4байта информации
Сосуд изготовлен в Греции в 3 веке. Метод от противного - если берём за правильный вариант финский сосуд, то расходятся даты его изготовления у Гриши и Алёши. Значит, сосуд действительно изготовлен в Греции, и так как ребята ошиблись с датой, то прав Боря - 3 век.
На одной странице 800 * 600 пикселей, на 1 пиксель отводится 24 бита памяти.
На все 4 страницы необходимо
4 * 800 * 600 * 24 бит = 4 * 800 * 600 * 3 байт = 5760000 байт = 5625 Кб
(1 байт = 8 бит, 1 Кб = 1024 байт)
Function ProdDig(n:longint):longint;
var
p:longint;
begin
p:=1;
while n>0 do begin
p:=p*(n mod 10);
n:=n div 10
end;
ProdDig:=p
end;
var
f:Text;
a,b,c:longint;
begin
Assign(f,'abc.txt');
Reset(f);
Readln(f,a,b,c);
Close(f);
Assign(f,'abcout.txt');
Rewrite(f);
Writeln(f,ProdDig(a+b+c));
Close(f)
end.
<em><u>Вариант без использования функции:</u></em>
var
f:Text;
a,b,c,p,s:longint;
begin
Assign(f,'abc.txt');
Reset(f);
Readln(f,a,b,c);
Close(f);
s:=a+b+c; p:=1;
while s>0 do begin
p:=p*(s mod 10);
s:=s div 10
end;
Assign(f,'abcout.txt');
Rewrite(f);
Writeln(f,p);
Close(f)
end.