Определить количество элементов массива больше заданного числа - Turbo Pascal
Формулировка задачи:
Дан числовой массив А, состоящий из n натуральных чисел. Определить кол-во элементов массива больше заданного числа.
Решение задачи: «Определить количество элементов массива больше заданного числа»
textual
Листинг программы
readln(x); k:=0; for i:=1 to n do if a[i]>x then inc(k);