Предмет: Информатика, автор: morebrains

В массиве из 12 элементов, заданных по формуле F[i]=i^2-5i-14
Найдите сумму положительных значений


Wani4kaa: На каком языке?
morebrains: Pascal abc

Ответы

Автор ответа: Wani4kaa
1

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.

Похожие вопросы
Предмет: Геометрия, автор: 6opka
Предмет: Математика, автор: ученик6662