83 в восьмеричной и шестнадцатиричной системе счисления.

1)  var  a: array[0..100] of integer;   i, s, n: integer; begin  writeln('введите количество элементов в массиве: '); readln(n);       for i : = 1 to n do    begin    a[i] : = random(10);     write(a[i], ' ');     s : = s * a[i];   end;       writeln;   writeln(s); end.2)  var  a: array[0..100] of integer;   i, s, n: integer; begin    writeln('введите количество элементов в массиве: '); readln(n);       for i : = 1 to n do    begin    a[i] : = random(10);     write(a[i], ' ');   end;       for i : = 1 to n do    begin    // if (i mod 2=0) then s: =s+a[i]; раскоментируй, если сумму нужно искать среди четных номеров элементов.    // if (a[i] mod 2=0) then s: =s+a[i]; раскоментируй, если сумму нужно искать среди самих четных элементов.  end;       writeln;   writeln(s); end.3)var  a: array[0..100] of integer;   i, s, n, max: integer; begin  writeln('введите количество элементов в массиве: '); readln(n);         for i : = 1 to n do    begin    a[i] : = random(10);     write(a[i], ' ');   end;   s: =0;     for i : = 1 to n do    begin    if (a[i]> s) then s: =a[i];   end;       writeln;   writeln(s); end.4)var  a: array[0..100] of integer;   i, s, n, max: integer; begin  writeln('введите количество элементов в массиве: '); readln(n);       for i : = 1 to n do    begin    a[i] : = random(10);     write(a[i], ' ');   end;   s: =0;   for i : = 1 to n do    begin    if (a[i]> s) and (a[i] mod 3=0) then s: =a[i];   end;       writeln;   writeln(s); end.

#include< iostream> using namespace std;   int main() {     int sum=0, mas[30];     for(int i=1; i< =30; i++)   //инициализируем массив значениями от 1 до 30      mas[i] = i;     for(int i=2; i< 32; i+=2)   // алгоритм подсчета сумы элементов массива       sum+=mas[i];   // суммируем значения массива находящихся на четных местах                             // записываем их в переменную sum     cout < < sum; }