Pascal
var
a,b : integer;
r : boolean;
begin
readln (a);
r := true;
b := a mod 10;
While a > 0 do
begin
if a mod 10 <> b then
begin
r := false;
a := 0;
end;
a := a div 10;
end;
if r then
writeln ('Все цифры числа одинаковы')
else
writeln ('Цифры числа различны');<span>
end.</span>
Чем отличается сохранить и сохранить как? ну если по логически подумать сохранить, сохраняет в том формате в котором работал, а сохранить как уже выбераешь сам как сохранить и в каком формате.
29,25,21,17,13,9,5. Те каждое следующее число уменьшается на 4)
2³³ байт=2³³:2^10=2²³Кбайт=2²³:2^10=2¹³Мбайт=2¹³:2^10=2³Гбайт=8Гбайт
Ответ: 8 Гбайт