Данные о росте учащихся класса хранятся в виде массива. Рост мальчиков кодируется знаком минус, а рост девочек знаком плюс. Составьте блок-схему и программу определения среднего роста девочек и мальчиков одного класса. В классе учится п учеников.

const n=10;vara: array[1..n] of integer;i, km, kf, tm, tf: integer;sm, sf: real;beginfor i:=1 to n do  readln(a[i]);  //считываем массивkm:=0; kf:=0; tm:=0; tf:=0;for i:=1 to n do//находим суммарный рост мальчиков//и девочек, и количество  if a[i] < 0 then  begin    km:=km+1;    tm:=tm + abs(a[i]);  end  else  begin    kf:=kf+1;    tf:=tf + a[i];  end;//находим среднее арифметическоеif km > 0 thensm:=tm/km;if kf > 0 thensf:=tf/kf;writeln('Средний рост мальчиков: ', sm);writeln('Средний рост девочек: ', sf);end.