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

Question

София Казакова

Информатика

19 августа, 03:59

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

+4

Ответы (1)

Знаешь ответ на этот вопрос?

Елизавета Фомина · Answer 1

Pascal:

Program n_1;

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.