Даны целое число n, вещественные числа . верно ли, что отрицательных членов в последовательности больше, чем положительных? программу написать на с++

#include <iostream>

using namespace std;

int main()

{

   int n;

   float a;

   cin >> n;

   int kp = 0, kn = 0;

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

   {

       cin >> a;

       if (a > 0) kp++;

       else if(a < 0) kn++;

   }

   if (kn > kp) cout << "verno";

   else cout << "neverno";

   return 0;

}

var

  A, B, N, i: integer;

 

begin

  N:= 0;  //Обнуляем счетчик

  writeln('Введите числа A и B');

  readln(A, B); //Вводим А и B

  if A < B then  {Если А < B, то печатаем числа начиная с B и заканчивая A, 

иначе наоборот}

    for i:= B downto A do

    begin

      write(i, '  ');  //Печатаем i

      inc(N);  //Увеличиваем счетчик на 1

    end

  else 

    for i:= A downto B do

    begin

      write(i, '  ');

      inc(N);

    end;

  writeln;

  writeln('Количество N этих чисел равно:  ', N);  //Выводим N

end.

Если все правильно, отметь решение как лучшее)

    

var

  A, B, N, i: integer;

 

begin

  N:= 0;  //Обнуляем счетчик

  writeln('Введите числа A и B');

  readln(A, B); //Вводим А и B

  if A < B then  {Если А < B, то печатаем числа начиная с B и заканчивая A, 

иначе наоборот}

    for i:= B downto A do

    begin

      write(i, '  ');  //Печатаем i

      inc(N);  //Увеличиваем счетчик на 1

    end

  else 

    for i:= A downto B do

    begin

      write(i, '  ');

      inc(N);

    end;

  writeln;

  writeln('Количество N этих чисел равно:  ', N);  //Выводим N

end.

Если все правильно, отметь решение как лучшее)