Оглавление – Назначение 2. Вставить название – Назначение 3. Вставить сноску – Назначение
197
246
Ответы на вопрос:
Var j,n : longint; function check(a,b : longint) : boolean; var i : longint; begin check: =true; for i: =2 to b do if ((a mod i)=0) and ((b mod i)=0) then check: =false; end; begin n: =0; for j: =100000 to 999999 do if check(j,70) then inc(n); writeln(n); end.
Популярно: Информатика
-
misterpordon13.07.2022 15:57
-
feruzbek21421.05.2022 22:58
-
ekaterinahbjdnxКатя08.06.2021 01:16
-
alicekuznetsova21.05.2023 03:38
-
hvbdnnd27.12.2022 16:02
-
привет88822.03.2023 20:49
-
daniilkrkrahmal26.08.2021 21:12
-
Артем0079667875602.01.2022 21:32
-
inikulin0086406.09.2022 02:14
-
АнтохаПрограммист14.12.2020 05:28