Дан массив a состоящий из 30 целых чисел — рост 30 учеников школы. Сколько из них имеет...

Question

Дан массив a состоящий из 30 целых чисел — рост 30 учеников школы. Сколько из них имеет рост больше 170 см? Можно ли сформировать баскетбольную команду (в команде должно быть не менее пяти человек ростом больше 170 см)?

Формат входных данных

На единственной строке через пробел записаны 30 целых чисел (100≤ai≤220)(100≤ai≤220) — росты учеников.
Формат выходных данных

Требуется в первой строке вывести единственное число — количество учеников, рост которых не меньше 170.
На следующей строке вывести «YES», если баскетбольную команду набрать можно, иначе вывести «NO».

Answer 1

Var
  i, c: integer;
  ar: array[1..30]of integer;

 begin
  c := 0;
  for i := 1 to 30 do begin
    read(ar[i]);
    if (ar[i] > 170) then c := c + 1;
  end;
  writeln(c);
if(c >= 5) then write('YES')
   else write('NO');
end.

Answer 2

//Так рост больше или не меньше 170? В данном решении рассматривается вариант с больше
//Dev-C++ 5.11 (C)

#include

int main(void)
 {const int n=30;
 int arr[n],k;
 k=0;
 for(int i=0;i  {scanf("%d",&arr[i]);
  if(arr[i]>170)
   k++;}
 printf("%d \n",k);
 if(k>=5)
  printf("YES");
 else
  printf("NO");
 return 0;}