В паскале!

В любом трехзначном числе удалить первую цифру, а в оставшемся 2-х значном числе переставить цифры.

Question

Федосей

21 сентября, 15:16

+4

Ответы (1)

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

Дениска · Answer 1

Var a, a1, a2, a3: integer;

begin

read (a) ;

a1:=a div 100 mod 10;

a2:=a mod 100 div 10;

a3:=a mod 10;

writeln (a3, a2) ;

end.

В паскале!В любом трехзначном числе удалить первую цифру, а в оставшемся 2-х значном числе переставить цифры.