Информатика, 8 класс. система счисления, ! ​

// pascalabc.net 3.0, сборка 1144 от 16.01.2016 begin   var a: =arrrandom(100,-10,10);   a.println;   writeln(a.where(x-> x> 0).count,' положительных, ',       a.where(x-> x< 0).count,' отрицательных') end. тестовое решение: 4 -6 0 8 2 -2 -1 -8 -6 8 -3 7 4 -7 -5 9 0 -3 -7 1 0 -4 6 3 8 -10 4 9 3 5 8 5 5 8 10 4 -8 3 8 8 -9 2 7 -8 -7 -5 2 -9 0 9 -7 7 -2 -6 7 -2 -1 7 -10 2 4 1 -1 0 10 3 -8 6 -6 2 6 7 -1 -4 -1 8 0 3 0 2 -2 2 -1 5 1 -9 -4 1 -9 1 -6 -5 3 -4 -7 1 -7 -3 -7 1 51 положительных, 42 отрицательных

#include < iostream> #include < random> #include < ctime> using namespace std; mt19937 gen(time(0)); uniform_int_distribution< > uid(0, 19); void replace(int *a, int n, int k) { int last = a[n]; for (int i = n - 1; i > = k; { a[i + 1] = a[i]; } a[k] = last; } int main() { int n = 0, k = 0; cin > > n; int *a = new int[n]; if (n < = 100) {   for (int i = 0; i < = n; i++) {   a[i] = uid(gen); cout < < a[i] < < " ";   }   cout < < endl; cin > > k;   if (k < = n) {   replace(a, n, k - 1);   for (int i = 0; i < = n; i++) {     cout < < a[i] < < " "; }   } else {   cout < < "error" < < endl;   } } else {   cout < < "error! " < < endl; } delete[] a; return 0; }