Ввести трехзначное число а. Прменять крайние цифры числа местами.

Question

Информатика

Арсюта

23 декабря, 16:27

Ввести трехзначное число а. Прменять крайние цифры числа местами.

+1

Ответы (1)

Знаете ответ на вопрос?

Антонина · Answer 1

Var

a, x:integer;

begin

writeln ('Vvedite a') ;

readln (a) ;

x:=a mod 10*100;

a:=a div 10;

x:=x+a mod 10*10;

x:=x+a div 10;

writeln ('resultat ', x)

end.