• Предмет: Информатика
  • Автор: Владааааааааааа
  • Вопрос задан 10 лет назад

В целом 3 значном числе поменять местами 1 и последнюю цифру(паскаль)

Ответы

Ответ дал: eleott
0
  VAR N,a,b,c:INTEGER; 
begin 
 Readln(n);  
  a:=(n mod 100)div 10; 
b:=(n mod 100)mod 10; 
 c:=n div 100; 
  writeln(b,a,c); 
end.
Ответ дал: eleott
0
работает?
Ответ дал: Владааааааааааа
0
да, большое спасибо
Похожие вопросы