Тема массивы) На улице 40 домов.Известно сколько людей проживает в каждом из домов,количество жильцов в каждом доме [50..200]
1.Сколько всего жителей?
2.Вывести номера домов
3.количество жильцов по возрастанию
, очень надо.

PascalABC.NET 3.4.2, сборка 1979 (16.02.2019)

const  xMin    = 1.5;  xMax    = 2.3;  xDelta  = 0.1; var  x, y, resultSum: real;  valueOfIt: integer; begin  x := xMin;  while x <= xMax do    begin      y := 0.5 + Sqrt(Power(x, 2.0) + 1) - Power(Tan(Power(x, 2.0) + 1), 2.0);      if (y < 0) then        resultSum := resultSum + y;      x := x + xDelta;      valueOfIt := valueOfIt + 1;    end;  Writeln('Среднее отрицательных значений: ', resultSum / valueOfIt); end.ответ

Среднее отрицательных значений: -12.7547010184892

Тоисть при работе с разными программами Windows делает одинаковый интерфейс для них. Интерфейсы являются основой взаимодействия всех современных информационных систем. Если интерфейс какого-либо объекта (персонального компьютера, программы, функции) не изменяется (стабилен, стандартизирован), это даёт возможность модифицировать сам объект, не перестраивая принципы его взаимодействия с другими объектами (например, научившись работать с одной программой под Windows, пользователь с легкостью освоит и другие — потому, что они имеют однотипный интерфейс).