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

клубника25 клубника25    3   21.05.2019 12:00    12

Ответы
lizperepelitsa lizperepelitsa  15.06.2020 17:05

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика