Ответы
Ответ дал:
1
Ответ:
Pascal:
var
a, b: integer;
begin
b := 0;
readln(a);
while a > 0 do begin
b := a mod 10 + 10 * b;
a := a div 10;
end;
writeln(b);
end.
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад