Подскажите пожалуйста. Запишите программу в Кумире Объявлен набор в школьную ба??кетбольную

Подскажите пожалуйста. Запишите программу в Кумире
Объявлен набор в школьную ба??кетбольную команду. Известен рост каждого из N учеников, желающих попасть в команду. Напишите программу подсчета кол-ва претендентов имеющих шанс попасть в команду,если рост игрока команды должен быть не менее 170 см
Категория: Информатика 3 года назад
На вопрос 3 года назад
Валик Мельник
Program players;
  var
    n, p, i: byte;
    height: word;
begin
  write('Кол-во желающих: ');
  read(n);
  p:=0;
  for i:=1 to n do
    begin
      write('Рост ', i, ' желающего: ');
      read(height);
      if height => 170 then
        p:=p+1;
    end;
  write('Претендентов: ', p);
end.
Предположительно, так.
Ответ получен 3 года назад
Арсен Денисов

Пожалуйста зарегистрируйтесь/войдите для ответа на вопрос.  Нажмите для входа

Войти на сайт