Дано 3-х значное число, найти число, которое образуется перестановкой десятков и едениц. (программа Паскаль)

Question

Информатика

Камилла

14 декабря, 18:41

Дано 3-х значное число, найти число, которое образуется перестановкой десятков и едениц. (программа Паскаль)

+3

Ответы (1)

Знаете ответ?

Лавря · Answer 1

Program al;

var a, b, c, n:integer;

begin

writeln ('n=') ;

readln (n) ;

a:=n div 100;

b:=n div 10 mod 10;

c:=n mod 10;

writeln ('novoe=', a, c, b) ;

readln;

end.