Введя с клавиатуры 3-значное число, получить и вывести на экран новое число, поменяв местами разряды десятков и единиц
Ответы на вопрос
Ответил petyaGavrikov
0
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
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
Новые вопросы