Задание

Ниже приведён алгоритм. Укажите наименьшее из таких чисел x, большее, чем 100, при вводе которого алгоритм напечатает 21.

var x, L, M: longint;

begin

readln(x);

L := 3*x - 6;

M := 3*x + 99;

while L <> M do

if L > M then

L := L - M

else M := M - L;

writeln(M)

end.

114

103

107

121