Создать массив, каждый элемент которого рассчитывается по формуле: i^2-1, где i – индекс элемента массива. вывести полученный массив на экран, расположив каждый элемент в отдельной строке.

Program abc; const     n = 10; var     m: array [1..n] of integer;     i: integer; begin for i : = 1 to n do     begin m[i] : = sqr(i) - 1;     writeln(m[i]); end; end.

Sub main() dim a(1 to 4,1 to 5) as integer, b(1 to 4,1 to 5) as integer, c(1 to 4,1 to 5) as integer, i as integer, j as integer 'здесь устанавливаются элементы матрицы a for i=1 to 4 for j=1 to 5       if a(i,j)> 0 then               b(i,j)=a(i,j)               c(i,j)=0 'хотя это необязательно, все элементы изначально нулевые       else               b(i,j)=0               c(i,j)=a(i,j)       end if next j next i 'вывести матрицы b и c end sub

For(int i=0; i< 12; i++)//i  { sum+=a[i]; // a[i]  ; sum сумма } sr=sum/12; // sr среднее  арифметическое for(int i=0; i< 12; i++)//i  {             if(sr< a[i])              {                   kol++;               } } printf("%d",kol); kol   количество элементов, больше среднего арифметического всех ее элементов.