Водномерном массиве а10 определить сумму и количество элементов которые меньше 5. паскаль​

drxayala1 drxayala1    2   07.11.2019 06:55    0

Ответы
Анастасия201811 Анастасия201811  10.10.2020 11:40

const

 n = 10;

var

 i, k, s: integer;

 a10: array[1..n] of integer;

begin

 for i := 1 to n do

   read(a10[i]);

 s := 0;

 k := 0;

 for i := 1 to n do

   if a10[i] < 5 then

   begin

     s := s + a10[i];

     k := k + 1;

   end;

 write(s, ' ', k);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы