Сделайте работу по информатике! Вот работа, 1 вариант (дай )

Const
  nn=50; // максимальное количество учеников
var
  i,n,sm,sd,km,kd:integer;
  am,ad:real;
  var a:array[1..nn] of integer;
begin
  Write('Введите количество учеников: ');
  Read(n);
  Writeln('Введите рост учеников');
  sm:=0; sd:=0; km:=0; kd:=0;
  for i:=1 to n do
    begin
    Read(a[i]);
    if a[i]>0 then begin sd:=sd+a[i]; Inc(kd) end
    else begin sm:=sm-a[i]; Inc(km) end
    end;
  am:=sm/km; ad:=sd/kd;
  Write('Средний рост мальчиков (',am:0:1,') ');
  if am-ad<=10 then Write('не ');
  Writeln('превышает средний рост девочек (',ad:0:1,') ');
  Writeln('больше, чем на 10 см')
end.
   
Примерное решение

Введите количество учеников: 9
Введите рост учеников
-192 165 -174 179 -172 171 169 170 -170
Средний рост мальчиков (177.0) не превышает средний рост девочек (170.8)
больше, чем на 10 см

Ниже

Объяснение:

Плагиат — умышленное присвоение авторства чужого произведения науки или искусства, технических решений или изобретений. Плагиат может быть нарушением авторско-правового законодательства и патентного законодательства и в качестве таковых может повлечь за собой юридическую ответственность. С другой стороны, плагиат возможен и в областях, на которые не рас действие каких-либо видов интеллектуальной собственности, например, в математике и других фундаментальных научных дисциплинах.

Авторское право — это право интеллектуальной собственности. Каждый, кто вложил время, средства и умственный труд в создание какого-либо произведения, хотел бы защитить своё творение. В понятии «авторское право» различают три определения: автор, субъект и объект права. Автор — это всегда физическое лицо, которое создало произведение.