Question

Pascal/Дана следующая программа:
var a,b,r:integer;
begin
readln(a,b);
while b<>0 do begin
r:=a mod b;
a:=b;
b:=r;
end;
writeln(a);
end.
На вход программе переменной `a` подаётся значение `57`, а переменной `b` – какое-то натуральное число, строго меньшее `57`. Какое максимально возможное число может вывести программа?

Answer 1

Ответ:

19

Объяснение:

При значениях b = 38 и 19 программа выводит число 19, при других значениях b программа не выводит число больше 3