известно колличество жителей которые проживают в каждом из n районов города. Составить программу для нахождения колличества районов в котором проживает не больше чем 70000 жителей.
известно колличество жителей которые проживают в каждом из n районов города. Составить программу для нахождения колличества районов в котором проживает не больше чем 70000 жителей.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
i,n,k,a:integer;
begin
writeln('введите кол-во районов');
readln(n);
writeln('введите кол-во жителей для каждого района');
for i:=1 to n do begin
readln(a);
if a<70000 then
k:=k+1;
end;
writeln('кол-во районов,в которых проживает не больше 70000 жителей=',k)
end.