Ученикам первого класса, ежедневно выдаётся бесплатно стакан молока (200 мл), если их вес составляет мнение 30 кг. Определить, сколько литров молока требуется жедневно для одного класса из 25 человек. Вес каждого ученика представлен как элемент массива

Question

Информатика

Брина

28 июня, 05:35

Ученикам первого класса, ежедневно выдаётся бесплатно стакан молока (200 мл), если их вес составляет мнение 30 кг. Определить, сколько литров молока требуется жедневно для одного класса из 25 человек. Вес каждого ученика представлен как элемент массива

+1

Ответы (1)

Знаете ответ на вопрос?

Секлетея · Answer 1

Var a:array[1 ... 25] of word;

i, s:longint;

begin

writeln ('vvedit ves uchenika') ;

for i:=1 to 25 do

read (a[i]) ;

for i:=1 to 25 do

if a[i]<30 then s:=s+0.2; / / так как ответ в литрах

writeln (s) ;

readln;

end.