Помогите пожалуйста. Информатика. (9 класс)

0 голосов
26 просмотров

Помогите пожалуйста. Информатика. (9 класс)


image

Информатика (101 баллов) | 26 просмотров
Дан 1 ответ
0 голосов

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.

(3.9k баллов)