Задание 14 Параграф 3.5 ГДЗ Босова 8 класс (Информатика)

Рассмотрим вариант решения задания из учебника Босова, Босова 8 класс, Бином: 14. Напишите программу, которая генерирует 10 случайных чисел в диапазоне от 1 до 20, выводит эти числа на экран и вычисляет их среднее арифметическое.

Сначала зададим сумму s и обнулим её. Затем 10 раз сгенерируем случайное число от 1 до 20, выведем его на экран и прибавим к сумме. После цикла найдём среднее арифметическое по формуле $$sr=\frac{s}{10}$$ и выведем результат.

var
  i, s, x: integer;
  sr: real;
begin
  s := 0;
  randomize;
  for i := 1 to 10 do
  begin
    x := random(20) + 1;
    write(x, ‘ ‘);
    s := s + x
  end;
  sr := s / 10;
  write(‘sr=’, sr)
end.

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