Объявлен набор в школьную баскетбольную команду. Известен рост каждого из N учеников, желающих попасть в эту команду. Подсчитайте количество претендентов, имеющих шанс попасть в команду, если рост игрока команды должен быть не менее 170 см.Считайте рост претендента в команду случайным числом из диапазона от 150 до 200 см, а число претендентов n = 50.

Ответы:
Кристина Бабичева
09-02-2017 13:03

var a array 150..200 of Integer; i,n,t:Integer; begin t:=0; n:=50; for i:=1 to n do begin if a[i]>170 then t:=t+1; end; end.

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Объявлен набор в школьную баскетбольную команду. Известен рост каждого из N учеников, желающих попасть в эту команду. Подсчитайте количество претендентов, имеющих шанс попасть в команду, если рост игрока команды должен быть не менее 170 см.Считайте рост претендента в команду случайным числом из диапазона от 150 до 200 см, а число претендентов n = 50.» от пользователя Айжан Кудрина в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!