Введите необходимый знак в программу, который должен стоять на место "", чтоб программа правильно вычислила нод: 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.
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.
На место "..." ставим "<>"