Papapapapapam

Ответ:

var a,m:integer;

begin

 read(a);

 m:=a div 100;

 a:=a mod 100;

 print(a.ToString+m.ToString)

end.

Объяснение:

если есть какие-то вопросы, могу объяснить