Задание
Определите, что будет выведено на экран в результате выполнения фрагмента программы:
program main;
function evq(x, y: integer): integer;
begin
while (x <> y) do
if x > y then
x := x - y
else
y := y - x;
evq := x; end;
begin
a := 56;
b := 16;
writeln(evq(a, b));
end.