напишите программу на Паскале, которая генерирует 10 случайных чисел в диапазоне от 1 до 20 выводит эти числа на экрана и вычисляет их среднее арифметическое.

Конечно, вот программа на Паскале, которая генерирует 10 случайных чисел в диапазоне от 1 до 20, выводит их на экран и вычисляет среднее арифметическое:

program Генерация_Чисел;

var
  число, сумма: integer;
  счетчик: integer;
  среднее: real;

begin
  Randomize;
  сумма := 0;

  for счетчик := 1 to 10 do
  begin
    число := Random(20) + 1;
    writeln('Случайное число ', счетчик, ': ', число);
    сумма := сумма + число;
  end;

  среднее := сумма / 10;
  writeln('Среднее арифметическое: ', среднее:0:2);
end.

Эта программа генерирует 10 случайных чисел от 1 до 20, выводит их на экран и находит их среднее арифметическое. Надеюсь, эта информация будет полезной для вас!