PASCAL ABC
СРОЧНО
9 КЛАСС
Напишите программу для решения следующей задачи. На соревнованиях по бегу на 5000 метров для выхода в финал необходимо показать время не более 17 минут. Сколько спортсменов по результатам соревнований вышли в финал? Программа получает на вход количество спортсменов, принимавших участие в соревнованиях (1 ≤ N ≤ 100), затем для каждого спортсмена вводится число: минуты – время, показанное на дистанции.
СРОЧНО
9 КЛАСС
Напишите программу для решения следующей задачи. На соревнованиях по бегу на 5000 метров для выхода в финал необходимо показать время не более 17 минут. Сколько спортсменов по результатам соревнований вышли в финал? Программа получает на вход количество спортсменов, принимавших участие в соревнованиях (1 ≤ N ≤ 100), затем для каждого спортсмена вводится число: минуты – время, показанное на дистанции.
Answers & Comments
Verified answer
Vara, n, i, c: integer;begin
c := 0;
readln(n);
for i := 1 to n do
begin
read(a);
if(a <= 17) then c := c + 1;
end;
writeln(c);
end.