ПОМОГИТЕ СРОООООООООЧНО Условие Известны оценки ученика по 10 предметам. Определить его...

Question

ПОМОГИТЕ СРОООООООООЧНО Условие Известны оценки ученика по 10 предметам. Определить его средний балл по всем предметам. Формат входных данных Вводится десять целых чисел n1, n2, ..., n10 (1≤ni≤5). Формат выходных данных Требуется вывести средний балл ученика. НАПРИМЕР: ВХОДНЫЕ ДАННЫЕ 4 5 3 5 4 3 5 5 5 ВЫХОДНЫЕ ДАННЫЕ: 4.400000

Answer 1

Ответ:

const

 n = 10;

var

 i, s: integer;

 a: array[1..n] of integer;

begin

 Write('Введите оценки через пробел ');

 s := 0;

 for i := 1 to n do

 begin

   Read(a[i]);

   s := s + a[i]

 end;

 Writeln('Средний балл равен ', s / 10:0:2)

end.

Тестовое решение:

Введите оценки через пробел 4 5 3 4 4 5 3 5 5 4

Средний балл равен 4.20

Объяснение: