Определи, что выведет программа:

program prog;

var a, b: integer;

function alg(x, y: integer):integer;

begin

while (x <> 0) and (y <> 0) do

if x > y then x := x - y

else y := y - x;

alg := x + y;

end;

begin

a := 26;

b := 39;

writeln (a * b div alg(a, b))

end.

Запиши в поле ответа верное число.

[ ]