Что изучает наука эгрономика? Каким должно быть расстояние между монитором и глазами?
Остальное на картинках.
140
156
Ответы на вопрос:
Var a,b,i: integer; begin readln(a); for i: =2 to a-1 do if a mod i=0 then inc(b); if b> 0 then writeln ('не простое') else writeln('простое'); end.
Популярно: Информатика
-
alskdjfhg123a03.03.2021 08:15
-
хорошист54910.11.2022 16:39
-
knarik8803.03.2022 04:47
-
gif1012.05.2022 16:45
-
myti766705.04.2020 20:14
-
annabragina1920.02.2020 04:03
-
svetika081302.04.2022 23:33
-
IvanNesterenok05.06.2022 12:29
-
nataljalevchen09.02.2023 02:08
-
HanZamay23.09.2021 23:54