Дан массив b(m), m≤15 . все элементы с четными номерами удвоить, а с нечетными - заменить нулями. вывести на печать исходный и переформированный массив. на языке с++

#include < iostream> using namespace std; int main() {     int m;     cout < < "m = ", cin > > m, cout < < "\n";     int b[m];     srand(time(null));     cout< < "array: \n";     for (int i=0; i< m; i++)     {       b[i]=rand() % 50;       cout< < b[i]< < " ";     }     cout < < "\n";     for (int i=0; i< m; i++)       if ((i+1)%2==0) b[i] *= 2;       else b[i]=0;     for (int i=0; i< m; i++) cout < < b[i] < < " ";     cout < < "\n";     return 0; } пример: m = 10array: 47 3 29 46 36 31 2 2 20 200 6 0 92 0 62 0 4 0 40

var a,b,c: array [1..100,1..100] of integer;

as,bs,cs,i,j: integer;

begin

  sb: =1;

  for i : = 1 to n do

        for j: = 1 to n do

        begin

            if a[i,j]< 0 then sa: =sa+a[i,j];

          if b[i,j]> 0 then sb: =sb*b[i,j];

            if j=3 then sc: =sc+c[i,j];

        end;

    writeln(sa,sb,sc);

end.