Фирс
4 год назад
Дано четырехзначное число найдите число полученное при прочтении его цифр справно налево
ОТВЕТЫ
Валентин
Oct 24, 2020
var
n:integer;
begin
Write('n='); Read(n);
while n>0 do begin
Write(n mod 10);
n:=n div 10
end
end.
n=3607
7063
732
Смежные вопросы: