Даны натуральные числа x и y. вычислите их нок. - вопрос №20539 от sveta19772011owor7w 01.08.2020 12:27

Question

Информатика: Даны натуральные числа x и y. вычислите их нок. для паскаля! надо

sveta19772011owor7w · Answer

var x,y,nod,nok:longint;   begin   read(x,y);   a:=x; b:=y; while (a 0) and (b 0) do if a b then a:=a mod b else b:=b mod a; nod:=a+b; nok:=(x div nod)*y;   write(nok);   end;...