Question

Определить результат выполнения следующего фрагмента программы: x:=20y:=30if x>y then x:=x-yelse y:=y-xif x=y then writeln('НОД(',x,';',y,')=',y)else writeln('НОД(',x,';',y,')<>',y)

Answer 1

30 - 20 = 10 / y = 10.

x не равен y.

20, 10, 10

Answer 2

Давайте проанализируем данный фрагмент программы по шагам:

1. x:=20 - Присваиваем переменной x значение 20.
2. y:=30 - Присваиваем переменной y значение 30.
3. if x>y then x:=x-y else y:=y-x - Здесь происходит проверка условия "x > y". Поскольку 20 не больше 30, выполняется вторая часть условия "else", и переменная y перезаписывается как y:=y-x, то есть 30-20=10.

Теперь значения переменных: x=20, y=10.

4. if x=y then writeln('НОД(',x,';',y,')=',y) else writeln('НОД(',x,';',y,')<>',y) - В этом блоке происходит проверка условия "x = y". Поскольку 20 не равно 10, выполняется вторая часть условия "else", и программа выводит строку 'НОД(',x,';',y,')<>',y).

Таким образом, результат выполнения данного фрагмента программы будет:

НОД(20;10)<>10