37

Напишите программу, которая генерирует 10 случайных чисел в диапазоне…

andrewmv 30 марта 2023

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

категория: информатика

69

const n=10; var a, summ, i: integer; begin randomize; summ: =0; for i: =1 to n do begin a: =random (20)+1; summ: =summ+a; write (a, '); end; writeln; writeln ('Среднее арифметическое этих чисел ',summ / n); end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...