Підрахувати кількість від’ємних, додатних та нульових елементів. delphi. в массиве

#include <iostream>

#include <cmath>

using namespace std;

bool is_prime_num(int x) {

   for(long long i=2 ; i <= sqrt(x); i++)

 if( x % i == 0)

  return false;

return true;

}

int main()

{

   int arr[10000];

   int n;

   cin >> n; // вводим кол-во элементов массива

   for (int i = 0; i < n; i++)  {

       cin >> arr[i]; // вводим элементы массива n раз

   }

   int a,b;

   cin >> a >> b; // вводим границы диапазона

   int result = 0;

   for (int i = a; a < b; i++) {

       if (is_prime_num(arr[i])) {

           result = arr[i];

           break;

       }      

   }

   if ( result == 0) cout << "There is no prime";

   else cout << result;

   return 0;

}

Объяснение:

 Как - то так, если что непонятно - спрашивай

Написал на С++

Объяснение:

Код:

#include <iostream>//для ввода - вывода

#include <windows.h>//для русской раскладки

using namespace std;

int main()

{

SetConsoleCP(1251);//подключаем русскую раскладку

SetConsoleOutputCP(1251);

int x, y, n;

cout << "Введите x: ";

cin >> x;

cout << "Введите y: ";

cin >> y;

cout << "Введите n: ";

cin >> n;

if (x == 0 && y == 0)

 cout << "Точка находится в начале координат" << endl << endl;

else

 cout << "Точка не находится в начале координат" << endl << endl;

cout << "Все значения y по формуле y=2x-5:" << endl;

for (int x = 1; x < n; x++)

{

 cout << 2*x - 5 << " ";

}

system("pause");//задержка консоли

return 0;

}