Введя с клавиатуры 3-значное число, получить и вывести на экран новое число, поменяв местами разряды десятков и единиц

Question

Информатика

Люба

17 сентября, 19:05

Введя с клавиатуры 3-значное число, получить и вывести на экран новое число, поменяв местами разряды десятков и единиц

+5

Ответы (1)

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

Ританя · Answer 1

Var a, b:integer;

begin

write ('a = ') ; readln (a) ;

b: = (a div 100) * 100 + (a mod 10) * 10 + (a div 10 mod 10) ;

writeln ('b = ', b) ;

end.

Пример:

a = 123

b = 132