Программа:
Pascal:
var
arr: array of integer;
n, i, sum: integer;
begin
write('Количество учеников: '); readln(n);
SetLength(arr, n);
for i := 0 to n - 1 do begin
arr[i] := random(2, 5);
sum += arr[i];
end;
writeln('Оценки учеников в классе: ', arr);
writeln('Средняя оценка: ', sum/n);
end.
Для начала выделяем память массиву целых чисел, после - регистрируем переменные, которые будем использовать далее. Запрашиваем кол-во учеников (это и будет размерностью массива), устанавливаем длину массива - введённое число n. Циклом проходима по элементам массива, устанавливаем рандомное значение от 2 до 5 и суммируем элементы. В конце выводим сам массив и высчитываем среднюю оценку как среднее арифметическое чисел.
A = int(input())
B = int(input())
C = int(input())
a=A
b=B
c=C
if a>b:
b=a
else:
a=b
if a>c:
c=a
else:
a=c
if A<B:
B=A
else:
A=B
if A<C:
C=A
else:
A=C
print(c+C)
Объяснение: