Вариант 8

Дано трёхзначное натуральное число. Получить другое натуральное число, в котором порядок цифр изменён на противоположный. Как будет выглядеть эта программа на языке паскаль?

Question

Информатика

Татуся

11 октября, 21:55

Вариант 8

Дано трёхзначное натуральное число. Получить другое натуральное число, в котором порядок цифр изменён на противоположный. Как будет выглядеть эта программа на языке паскаль?

+1

Ответы (1)

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

Настасий · Answer 1

Program swap

var a, b, c, n, m : integer;

begin

readln (n) ;

a:=n mod 10;

m:=n-a;

n:=m/10;

b:=n mod 10;

m:=n-b;

c:=m/10;

m:=a*100+b*10+c;

writeln ('Ответ:', n) ;

readln;

end