Запишите на языке паскаль программу решения : исходные данные(кол-во жильцов) представим с линейной таблицы а,содержащей n элементов: а(1)-кол-во жильцов дома 1, а(2)- кол-во жильцов дома (n)-кол-во жильцов дома n. в общем случае а(i)-кол-во жильцов дома i,где i принимает все значения от 1 до n(i=1,n).результат работы алгоритма обозначим через s. p.s. считайте количество жильцов дома случайным числом из диапазона от 50 до 200 человек,а число домов n=30
const n=30;
var a: array [1..n] of integer;s, i: integer;
begin
randomize;
for i:=1 to n doa[i]:= random (151)+50;for i:= 1 to n dos:=s+a[i];
writeln ('количество=',s);
readln;
end.