Const nn=40; { максимальное количество школьников в классе}
var n,i,k,s:integer; a:array[1..nn] of integer;
begin Write('Количество учеников в классе: '); Read(n); Writeln('Введите рост школьников'); s:=0; k:=0; for i:=1 to n do begin Read(a[i]); if a[i]<0 then begin s:=s+a[i]; k:=k+1 end; end; if k=0 then Writeln('Сведения о росте мальчиков отсутствуют') else Writeln('Средний рост мальчиков равен ',-s/k:0:1) end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку