Дана процедура: procedure nod (a, b: integer; - вопрос №10913640 от sawulja123D 18.03.2020 15:08

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)?

sawulja123D · Answer

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

Дана процедура: 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)?

Дана процедура:
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)?