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

Question

Информатика

Толюня

29 марта, 10:27

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

+5

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