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

Question

Информатика

Милен

28 января, 05:12

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

+2

Ответы (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.