Объяснение: почти все компиляторы имеют ограничение по оперативной памяти, а программа требует ее в количестве Дохрена , потому пришлось использовать либо вектора либо динамичнские массивы(я выбрал динамические )
#include <iostream>
using namespace std;
int main()
{
long long *p = new long long[2000000];
long long *p1 = new long long[2000000];
long long *p3 = new long long[2000000];
long long *h = new long long[2000000];
long long n, u{0}, kf, x, o, p2{0};
cin >> n >> x; //n=1 x=2
for (long i = 0; i < n; i++)
cin >> h[i]; //=3
cin >> kf; //=5
for (long i = 0; i < kf; i++)
{
cin >> p[i];
if (p[i] == 1)
cin >> h[n++];
if (p[i] == 2)
p2++;
if (p[i] == 3)
{
long long l{0};
cin >> p3[u];
p3[u] += p2 + 1;
for (long long j = p2; j < p3[u] - 1; j++)
if (h[j] >= x)
l++;
u++;
cout << l << endl;
};
};
delete[] p, p1, p3, h;
}
Первая программа:
program n1;
var a: array[1..10] of integer;
i,k:integer;
begin
for i:=1 to 10 do a[i]:=random(100);
K:=0;
For i:=1 to 10 doIf a [i]> 50 then k:=k+1;
Write ('k=', k);
end.
Вторая программа:
program n1;
var a: array[1..10] of integer;
i,s:integer;
begin
for i:=1 to 10 do a[i]:=random(100);
s:=0;
for i:=1 to 10 doif (a [i]>50) and (a [i]<60) then s:=s+a [i];
write ('s=', s);
end.