Question

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

Answer 1

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

// Проверить негде, паскаля нет) 

Answer 2

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

Answer 3

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

ed702ecd13f8014f46c4d6e246e1269e.txt

526d68a3232872dfdea1f5195ba09721.txt