Question

Дана процедура:
procedure nod (a, b: integer; var c: integer);
begin
while a<>b do
if a>b then a:=a-b else b:=b-a;
c:=a
end;
Чему равно значение с после вызова процедуры nod (120, 72, c)?

Answer 1

Ответ:

Значение с после вызова процедуры nod равно 24.