Sealas
6 год назад
PASCAL ABC
СРОЧНО
9 КЛАСС
Напишите программу для решения следующей задачи. На соревнованиях по бегу на 5000 метров для выхода в финал необходимо показать время не более 17 минут. Сколько спортсменов по результатам соревнований вышли в финал? Программа получает на вход количество спортсменов, принимавших участие в соревнованиях (1 ≤ N ≤ 100), затем для каждого спортсмена вводится число: минуты – время, показанное на дистанции.
ОТВЕТЫ
Христофор
Jul 23, 2019
Var
a, n, i, c: integer;
begin
c := 0;
readln(n);
for i := 1 to n do
begin
read(a);
if(a lt;= 17) then c := c + 1;
end;
writeln(c);
end.
begin
c := 0;
readln(n);
for i := 1 to n do
begin
read(a);
if(a lt;= 17) then c := c + 1;
end;
writeln(c);
end.
40
Смежные вопросы:
