С ИНФОРМАТИКОЙ!
Какие именно формулы нужно применять к каждому из заданий??
1. Подсчитать количество пятерок по информатике. 2. Посчитать количество пятерок по информатике и химии. 3. Посчитать количество 5 информатике за 16 июня. 4. Подсчитать общее число оценок: 3, 4, 5. 5. Подсчитать средний бал по информатике.
269
318
Ответы на вопрос:
Var n,i,k: integer; begin read(n); for i: =1 to n do if (n mod i = 0) and (i mod 2 < > 0) then k: =k+1; writeln(k); end.
Популярно: Информатика
-
LoliTyan108.10.2021 09:02
-
Lopkrtjvbbcx24.02.2020 13:48
-
nikitos13372819.06.2023 13:49
-
22145127.05.2021 04:47
-
Яяяячканр34525.01.2021 05:24
-
КАНЯ111111111128.09.2020 18:32
-
Margaryaanmag23.05.2020 21:00
-
ghhgbg29.07.2021 13:08
-
Даня1919119.07.2022 07:08
-
evgehamorozov01.12.2021 02:49