Взаданном массиве к четным элементам прибавить a . а из элементов с четным номером вычесть b.

const n=5; var m: array[1..n] of integer; i,a,b: integer; beginreadln(a,b); for i: =1 to n do readln (m[i]); for i: =1 to n doif i mod 2 = 0 then m[i]: =m[i]+aelse m[i]: =m[i]+b; for i: =1 to n dowriteln ('m[', i,']=', m[i]); end.

1

#include< iostream> #include< ctime>

using namespace std;

int main(){ srand(time(null)); int n, min = 10, range = 30; int *arr; cout < < "enter size of arr(enter n) : "; cin > > n; arr = new int [n]; for(int i = 1; i < = n; i++) arr[i] = rand()%(range + 1) + min; cout < < "arr : " < < endl; for(int i = 1; i < = n; i++) cout < < arr[i] < < " " ; cout < < endl; for(int i = 1; i < = n; i++){ if(arr[i] > 25) arr[i] = i*i; else arr[i] = arr[i] + 5; } cout < < "newarr : " < < endl; for(int i = 1; i < = n; i++) cout < < arr[i] < < " " ; }

2

#include< iostream>

using namespace std; int main(){ int n; int *arr; cout < < "enter size of arr(enter n) : "; cin > > n; arr = new int [n]; for(int i = 1; i < = n; i++) cin > > arr[i];

int temp = arr[1]; int templ = arr[n];

arr[1] = arr[2]; arr[2] = temp; arr[n] = arr[n-1]; arr[n-1] = templ; cout < < "new arr : "; for(int i = 1; i < = n; i++) cout < < arr[i] < < " " ; }

program a_86betiri; uses crt; const n=20; var  a: array[1..n] of real;   sum, mt: real;   i: integer; begin  writeln('*** alphaues is ***');   writeln('***                  ok                        ***');   sum: =0;   mt: =1;   randomize;   for i: =1 to n do      begin          a[i]: =random(100);           sum: =sum+a[i];       end;   writeln('элементы массива: ');   for i: =1 to n do      begin          if a[i]< (sum/n) then          mt: =mt*a[i];           write (a[i]: 7: 2);       end;     writeln();     writeln('произведение элементов, меньших, чем среднее арифметическое:   ',mt); end.