В одномерном массиве состояшим из 10 целых чисел найти количество элементов больших 70

В одномерном массиве состояшим из 10 целых чисел найти количество элементов больших 70
Гость
Ответ(ы) на вопрос:
Гость
var a: array[1..10] of integer; i, count: integer; begin for i:=1 to 10 do readln(a[i]); count:=0; for i:=1 to 10 do if a[i] < 70 then inc(count); writeln(count); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы