Можете вот кто сегодня или завтра утром сделаю от

что нужно делать напиши я зделаю

var a, i: integer;

begin

 a := 1;

 for i := 1 to 15 do

 begin

   writeln('Корень числа: ',a, ' , равен: ', sqrt(a):5:2);

   a := a + i;

 end;

end.

Текстовый вывод:

Корень числа: 1 , равен:  1.00

Корень числа: 2 , равен:  1.41

Корень числа: 4 , равен:  2.00

Корень числа: 7 , равен:  2.65

Корень числа: 11 , равен:  3.32

Корень числа: 16 , равен:  4.00

Корень числа: 22 , равен:  4.69

Корень числа: 29 , равен:  5.39

Корень числа: 37 , равен:  6.08

Корень числа: 46 , равен:  6.78

Корень числа: 56 , равен:  7.48

Корень числа: 67 , равен:  8.19

Корень числа: 79 , равен:  8.89

Корень числа: 92 , равен:  9.59

Корень числа: 106 , равен: 10.30

#include <iostream>

using namespace std;

int main() {

   int n;

   cin >> n;

   int mass[];

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

   cin >> mass[i];

   }

   int count_0 = 0, count_pol = 0, count_otr = 0;

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

   if (mass[i] == 0) {

       count_0++;

   }

   if (mass[i] > 0) {

       count_pol++;

   }

   if (mass[i] < 0) {

       count_otr++;

   }

   }

   cout << count_0 << " " << count_pol << " " <<count_otr;

   cout <<endl;

   system ("pause");

   return 0;

}