программирование алгоритмов циклической структуры

[arai uzbekova]

ойй спасиибо большое

[ryzinna]

Здравствуйте всем!!! помогите решить задачу!!! Задана последовательность из n вещественных чисел. определить сумму и количество элементов последовательности, меньших заданного значения d.

[PavelDD]

Здравствуйте всем!!! помогите решить задачу!!! Задана последовательность из n вещественных чисел. определить сумму и количество элементов последовательности, меньших заданного значения d.

Вот основной цикл:

for i:=1 to n do
         if a[i]<d then begin  {d - это заданное число}
            p:=p+a[i];    {p - это сумма}
            k:=k+1;        {k - это количество элементов}
         end;

Попробуйте так.

[ryzinna]

Спасибо! А не можете более подробнее написать полностью решение задачи?