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

Question

Информатика

Витяня

1 апреля, 05:43

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

+1

Ответы (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.