
Coakrezh
6 год назад
Даны два натуральных числа x и y, не превосходящие 400. Из заданных строк составьте недостающий фрагмент программы для нахождения наибольшего общего делителя x и y. Var x,y: integer;beginread(x,y);…write(x);end.1) DBHAG; 2) DCGAH; 3) DEGAH; 4) DEHAG.второе

ОТВЕТЫ

Julia Kirsti
Oct 24, 2020
Var x,y: integer;
begin
read(x,y);
while x<>y do
if x>y then x:=x-y else y:=y-x;
write(x);
end.
DCGAH
DBHAG - тоже верно
begin
read(x,y);
while x<>y do
if x>y then x:=x-y else y:=y-x;
write(x);
end.
DCGAH
DBHAG - тоже верно
824
Смежные вопросы: