Ответы на вопрос:
Var k,l,m,n,i: integer; begin writeln('введите k,l,m,n соответственно'); read(k,l,m,n); for i: =n to m do if (k mod i=0) and (l mod i=0) then writeln(i); end.
Популярно: Информатика
-
YuraJuliya04.10.2020 17:04
-
VaDiMiR300018.04.2023 22:29
-
sema6014.08.2021 06:23
-
Златусичька19.10.2020 19:25
-
Stepanych201708.01.2022 18:14
-
AndreyDixord06.08.2020 12:28
-
Vika1711200321.11.2021 03:36
-
otlichnik4116.05.2021 20:34
-
xDxzkaketodelat17.05.2020 12:00
-
Анимешник959516.01.2021 21:37