НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ.
НАЙТИ НАИБОЛЬШИЙ ОБЩИЙ ДЕЛИТЕЛЬ 2 НАТУРАЛЬНЫХ ЧИСЕЛ!
program prim; uses crt; var x,y:integer; begin writeln (введите x,y); readln (x,y); while x<>y do begin if x>y then x:=x-y else y:=y-x end; write (НОД=,x); end.
Оцени ответ