delphi записи

[Айс Беби]

в таблице хранятся следующие данные об учениках: фамилия, имя, отчество, рост, масса. сколько учеников могут заниматься в баскетбольной секции, если рост баскетболиста должен быть больше 170 см?

[veniside]

заниматься могут все, просто не каждый станет баскетболистом

[Айс Беби]

это в реальной жизни так. а мне надо написать программу в delphi
(((((

[Serge_Bliznykov]

идея решения явно такова:

CountMayBeBassketPlayer := 0; {счётчик, сколько может заниматься баскетболом}
for i:=1 to СколькоЗАписейВТаблице do
  if Таблица[i].Rost > 170 then  CountMayBeBassketPlayer := CountMayBeBassketPlayer + 1;

WriteLn('Баскетболом могут заниматься ', CountMayBeBassketPlayer, ' учеников. ');

[Айс Беби]

спасибо сегодня же попробую)))