Дано натуральное число. Записать число, записанное теми же цифрами, но в обратном порядке. Подсказка последовательно отделяемое каждую цифру, потом ее значение прибавляем к переменной s, умноженной на 10.

Question

Информатика

Авдуся

27 июля, 18:13

Дано натуральное число. Записать число, записанное теми же цифрами, но в обратном порядке. Подсказка последовательно отделяемое каждую цифру, потом ее значение прибавляем к переменной s, умноженной на 10.

+4

Ответы (1)

Знаете ответ на вопрос?

Михася · Answer 1

Pascal ABC

program perevod;

uses crt;

var

a, i, error:integer;

s, d:string;

begin

write ('Введите число: ') ;

readln (a) ;

str (a, s) ;

for i:=1 to length (s) do d:=s[i]+d;

val (d, a, error) ;

write ('Ответ: ', a) ;

end.