Вдвумерном массиве в строках хранится информация об оценках каждого из 20 учеников класса по тому или иному предмету (в первой строке — информация об оценках первого ученика, во второй — второго и т. общее число предметов равно 10. определить среднюю оценку по классу в целом. язык програмирования: с++

Максимальное число, составленное из утроенного произведения цифр  будет 
9*3*N  -  не  может быть больше 54,  т.е.  
N может быть только 1 или 2.  По условию х>=10  ->  N=2  (N -порядок числа).
Поэтому искать нужно среди чисел от 11 до 54.  Решение - число 15.

var n,m: integer;
begin
  write('n = ');  readln(n);
  if n=2 then
  begin    m:=11;
    repeat
      if (m mod 10)*(m div 10)*3=m then
      begin
        writeln('число:  ',m);
        m:=55;
      end;
      m:=m+1;
    until m>54;
  end
  else  writeln('нет решения');
end.

1)

Const
   N = 13;
Var
   A:array[1..N] of integer;
   i,j:integer;
Begin
For i:= 1 to N do
    Begin
    A[i]:=random(21)-10;
    Write(A[i],' ');
    End;
WriteLn;
For j:= 1 to N do
    For i:= 1 to N-1 do
        if A[i]<A[i+1] then Swap(A[i],A[i+1]);
For i:= 1 to N do
    Write(A[i],' ');

End.

2)

Var
   A:array[1..4,1..4] of integer;
   i,j:integer;
Begin
For i:= 1 to 4 do
    Begin
    For j:= 1 to 4 do
        Begin
        if (i+j) mod 2 = 0 then A[i,j]:=i*j
        else A[i,j]:=i+j;
        Write(A[i,j],' ')
        End;
    WriteLn
    End;
End.