Определи, что выведет программа: program prog; var a, b: integer; function alg(x, y: integer):integer; begin while x <> y do if x > y then x := x - y else y := y - x; alg := x; end; begin a := 128; b := 56; writeln (alg(a, b)) end. Запиши в поле ответа верное число.
Задание

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

program prog;

var a, b: integer;

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

begin

while x <> y do

if x > y then x := x - y

else y := y - x;

alg := x;

end;

begin

a := 128;

b := 56;

writeln (alg(a, b))

end.

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

[ ]