В ряду находятся 12 оценок Василия, нужно найти среднюю оценку Василия.
Решение с помощью одномерных массивов, на языке программирования Паскаль.
Ответы
Вот пример кода на языке Паскаль, который вычисляет среднюю оценку Василия, используя одномерный массив:
program average;
var
i: integer;
sum: real;
grades: array[1..12] of integer;
begin
sum := 0;
for i := 1 to 12 do
begin
writeln('Введите оценку Василия №', i);
readln(grades[i]);
sum := sum + grades[i];
end;
writeln('Средняя оценка Василия: ', sum / 12);
end.
В этом коде мы создаем массив grades, содержащий 12 элементов, соответствующих оценкам Василия. Затем мы используем цикл for, чтобы пройти по всем элементам массива, и запрашиваем у пользователя оценки.
Мы также создаем переменную sum, чтобы хранить сумму всех оценок, и добавляем каждую оценку к этой сумме. В конце мы выводим среднее значение, которое вычисляется как сумма оценок, поделенная на количество оценок (в данном случае, 12).