Введите необходимый знак в программу, который должен стоять на место "", чтоб программа правильно вычислила нод: var m,n: integer; begin writeln('введите m и n'); readln (m,n); while m n do begin if m> n then m: =m-n else n: =n-m end; write ('нод=',m); end.

Leonidch Leonidch    3   21.09.2019 14:10    0

Ответы
liza2002623 liza2002623  08.10.2020 07:17
Var m,n:integer;
Begin
write('Введите m и n: ');
readln (m,n);
while m<>n do
begin
If m>n then m:=m-n
else n:=n-m
end;
write ('НОД=',m)
end.

На место "..." ставим "<>"
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика