Помогите пожалуйста. Информатика. (9 класс)
var x, x1, x2: integer;
begin
readln (x);
x1:=x mod 100;
x2:=x div 100;
x:=x1*100+x2;
writeln (x1,' ',x2);
writeln (x)
end.