Определить количество элементов в массиве размерности n=10, не меньших заданного числа a=6 .

Question

Определить количество элементов в массиве размерности n=10, не меньших заданного числа a=6 .

Миша Задорожный Знаток (289), на голосовании 11 лет назад

массив Х={0,5,0,1,5,10,12,6,10,3}

Дополнен 11 лет назад

помогите написать это в паскале очень нужно

Answer 1

#include <iostream>
#include <algorithm>
#include <functional>
using namespace std;

int main() {
int x[] = {0,5,0,1,5,10,12,6,10,3};
int a = 6;
cout << "кол-во эл-то не меньших " << a << " равно "
<< count_if(begin(x), end(x), bind2nd(std::greater_equal<int>(), a)) << endl;
}

Миша ЗадорожныйЗнаток (289) 11 лет назад

не компилируется чего то....

Интересно, а в какой среде Вы компилируете эту программу? )

artnazarovМыслитель (8972) 11 лет назад

А почему не кошерный vector<int>?

ra Высший разум (113330) Тогда уж еще более кошерный array<int, 10> В задании явно написано, что массив из десяти элементов.

Answer 2

var x : array[0..255] of byte; n, a, c : byte; q : string;
begin
readln(n); // ввод размерности массива
for i:=1 to n do readln(x[i]); // ввод массива
readln(a); // ввод числа a
c:=0; // обнули счетчик
for i:=1 to n do if x[i]>=a then Inc(c);
// обходишь массив, проверяешь условие, если выполняется - увеличиваешь счетчик
writeln(c); // вывод числа элементов в массиве
readln(q); // ждать нажатия Enter

end.