вывести на экран среднее значение суммы 10 чисел
создать программу нахождения максимального среди n чисел

не работает что то не так

Грубые ошибки, если честно.

var i,j,k: integer; mas: array [1..10] of integer;beginwriteln('Заполните массив чисел:');for i:=0 to 10 do beginwriteln('Введите ', mas[i]);readln(mas[i]);end;for i:=0 to 10 do begink:=k+mas[i];end;k:=k/10;write(k);end.// Проверить негде, паскаля нет) 

Решения в приложении!!