1. Удалить файл
2. Закрыть рекламу
3. Проверить комп на вирусы
Не знаю в каком порядке
ну или позвать взрослых
Надеюсь, что ты поймешь. Пыталась итак подробно объяснить...
(Вместо 35 - 32, извините, поторопилась. Но ответ 57 в 10-ой системе)
24576 бит = 3072 байт = 3 КиБ
16384 бит = 2048 байт = 2 КиБ
12288 бит = 1536 байт = 1,5 КиБ
бит = 8192 бит = 1024 байта = 1 КиБ
16384 бит = 2048 байт (
байт) = 2 КиБ
131072 бит = 16384 байт = 16 КиБ
Можно реализовать через строки, но вы видимо только начали проходить Паскаль, поэтому такой вариант ;-)
Var n,sum,pr,a:integer;
begin
readln(n);
sum:=0
pr:=1;
while n<>0 do
begin
a:=n mod 10;
sum:=sum+a;
pr:=pr*a;
n:=n div 10;
end;
writeln(sum,' ',pr);
end.