Написать программу на языке турбо Паскаль
Начало
X: = 2
Y: = 3
Да. X>y нет
Y : = x+1 y : = x
X : = y x : = y - 1
Конец