Готовясь к новому году, Петр Михайлович решил купить несколько подарков в своем любимом магазине «Карл Гаусс». Как обычно в этом магазине проводилась
акция. В этот раз условия были следующими: первый подарок продается за Арублей,
а каждый следующий стоит на Р рублей больше. У Петра Михайловича с собой было
M рублей. Сколько он сможет купить подарков? напишите на c++​

Const n=5;
var
i,q:integer;
a:array [1..n] of integer;
b:array [1..n] of integer;
c:array [1..50] of integer;
begin
writeln ('Заполните первый массив');
for i:=1 to n do
read (a[i])                      ;
writeln ('Заполните второй массив') ;
for i:=1 to n do
read (b[i]);
for i:=1 to n do begin
if i mod 2<>0 
then begin q:=q+1;
c[q]:=a[i]; 
q:=q+1;
c[q]:=b[i]; 
end; 
end;
for i:=1 to n do 
if b[i]>0 
then begin   
q:=q+1;   
c[q]:=b[i]; 
 end; 
if q=0 
then writeln ('условие не выполняется') 
else begin
for i:=1 to q do
write (' ',c[i]);
end
end.

P.s. Вы можете изменять константу, и ограничивать вводимые значения вводом, но не забывайте, что первые два массива не должны превышать количество ячеек, ограниченной константой. Можно эту константу поменять, это все на ваше усмотрение.
P.p.s. Программа написана на Pascal ABC.

#include <cstdlib>
#include <iostream>

using namespace std;

int main(int argc, char *argv[])
{int i,k,max,j,n,s;
srand(time(NULL)); k=0; s=0;
cout<<"Введите размерность массива:"<<endl;
cin>>n;
int a[n];
cout<<"Данный массив:"<<endl;
for (i=0;i<=n;i++) {a[i]=rand()%21-10; cout<<a[i]<<" ";}
max=a[0]; j=0;
for (i=0;i<=n;i++) {if (a[i]<0) k=k+1; if (a[i]>max) {max=a[i]; j=i;}}
cout<<"Количество отрицательных элементов - "<<k<<endl;
for (i=j+1;i<=n;i++) s+=abs(a[i]);
cout<<"Сумма модулей элементов массива, расположенных после максимального - "<<s<<endl;

    system("PAUSE");
    return EXIT_SUCCESS;
}