Ответы на вопрос:
1) заполним массив по формуле из условия
2) пройдёмся по массиву и посчитаем сумму положительных значений.
всё можно сделать в одном цикле.
кодvar
f: array[1..12] of integer;
i, ans: integer;
begin
ans : = 0;
for i : = 1 to 12 do
begin
f[i] : = i * i - 5 * i - 14;
if f[i] > 0 then ans : = ans + f[i];
end;
writeln(ans);
end.
Популярно: Информатика
-
denisovavara1118.09.2022 20:41
-
Lizarainbowhi03.10.2022 00:51
-
Никаgyvhbbuh31.10.2022 07:44
-
лика48720.06.2020 15:46
-
aziko200215.01.2022 02:45
-
Kirito50507.01.2020 15:34
-
2908220.03.2021 20:40
-
смерть7322.01.2022 23:11
-
Daxa66611.03.2023 17:34
-
AnselmaRain31.12.2020 05:13