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