• Запишите пж задачу на языке паскаль:
    Определить, возможно ли сформировать баскетбольную команду из учащихся 9-х классов, если в команде должно быть не менее 6 человек ростом более 175.

Ответы 1

  • PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(ReadInteger('Всего учеников:'),162,183); a.Println;  if a.Where(t->t>175).Count>=6 then Writeln('Можно')  else Writeln('Нельзя')end.ПримерыВсего учеников: 28173 167 173 175 182 173 163 174 183 171 178 178 167 163 182 177 164 164 171 171 172 174 173 171 168 166 171 183МожноВсего учеников: 15181 169 163 163 166 164 176 174 173 168 168 162 167 178 175Нельзя
    • Автор:

      kevin
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years