Занесите информацию о десяти городах россии в массивы g (название города), n (численность населения). выведите название городов где: численность населения имеет максимальное и минимальное значение.
Const g:array [1..10] of string = ('Москва','Санкт-Петербург','Новосибирск','Екатеринбург','Нижний Новгород','Казань','Самара','Омск','Челябинск','Ростов-на-Дону'); n:array [1..10] of longint = (12198,5192,1567,1428,1268,1206,1171,1174,1182,1115); var i,imax,imin:longint; begin imax:=1; imin:=1; for i:=1 to 10 do begin if n[i]>n[imax] then imax:=i; if n[i]<n[imin] then imin:=i; end;
writeln('Город с наибольшей численностью ',g[imax]); writeln('Город с наименьшей численностью ',g[imin]);
g:array [1..10] of string = ('Москва','Санкт-Петербург','Новосибирск','Екатеринбург','Нижний Новгород','Казань','Самара','Омск','Челябинск','Ростов-на-Дону');
n:array [1..10] of longint = (12198,5192,1567,1428,1268,1206,1171,1174,1182,1115);
var
i,imax,imin:longint;
begin
imax:=1; imin:=1;
for i:=1 to 10 do
begin
if n[i]>n[imax] then imax:=i;
if n[i]<n[imin] then imin:=i;
end;
writeln('Город с наибольшей численностью ',g[imax]);
writeln('Город с наименьшей численностью ',g[imin]);
end.