Напишите программу вычисления наименьшего общего кратного следующих четырёх чисел: 36 54 18 и 15. используйте процедуру вычисления наибольшего общего делителя двух чисел. информатика 9 класс
226
369
Ответы на вопрос:
// нод(a,b)*нок(a,b)=a*b procedure nod(x,y: integer; var n: integer); begin repeat if x> y then x: =x mod y else y: =y mod x; until (x=0)or(y=0); n: =x+y; end; var a,b,c,d,e,n: integer; begin readln(a,b,c,d); nod(a,b,n); e: =a*b div n; nod(c,e,n); e: =c*e div n; nod(d,e,n); writeln('нок = ',d*e div n); end. пример: 36 54 18 15 нок = 540
Program qwerty; uses crt, graphabc; var x,x0,y0,k: integer; y: real; beginx0: =320; y0: =240; k: =50; for x: = -320 to 320 do beginif x< 0 then y: =x*xelse if (x> =0) and (x< 10) then y: =xelse if x> =10 then y: =1/xend; end. вы "счетчик" в real объявили, а он должен быть integer
Популярно: Информатика
-
1553VinyaPyhtya08.05.2020 06:43
-
ArianTop02.11.2020 01:55
-
CTpeJIa33324.12.2022 20:27
-
hanter1310.06.2020 22:28
-
1TeD02.05.2023 13:46
-
dnsadlerqwer10.06.2020 07:02
-
Graffiti133731.10.2021 16:39
-
ulchik457224.05.2020 19:51
-
kutinaI06.12.2020 18:11
-
клубника2502.09.2021 06:41