Запишите на языке Паскаль программу решения задачи номер 34 к § 3.4. Считайте рост пр

Запишите на языке Паскаль программу решения задачи номер 34 к § 3.4. Считайте рост претендента в команду случайным числом из диапозона от 150 до 200 см, а число претендентов n=50. (Номер задачи 34 - Объявлен набор в школьную баскетбольную команду. Извесьен рост каждого из N учеников, желающих попасть в эту команду. Составьте алгоритм подсчёта количества претендентов, имеющих шанс попасть в команду, если рост игрока команды должен быть не менее 170 см.
Гость
Ответ(ы) на вопрос:
Гость
//PascalABC.NET 3.1 сборка 1200 const     n = 50;     min = 150;     max = 200;     needed = 170; begin     var a := ArrRandom(n, min, max);     Writeln('Всего претендентов ', a.Where(x -> x >= needed).Count); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы