Информатика(pascal). составить программу нахождения - вопрос №7622070 от Айым200411 25.02.2022 20:24

Question

Информатика: Информатика(pascal). составить программу нахождения наименьшего общего кратного(нок) двух чисел m и n, используя формулу n*m=нод(n,m)* нок (n,m).

Айым200411 · Answer

Uses crt; var n,m,p : real; nod,nok : real; begin clrscr; write( n= ); readln(a); write( j= ); readln(b); p: =n*m; while n m do if n m then n: =n-m else m: =m-a; nod: =n; nok: =p/nod; writeln( нод: ,n); write( нок: ,nok); readln; end....