ПАСКАЛЬ! 1. Подсчитать среднее арифметическое натуральных чисел, принадлежащих диапазону от 1 до N
5-9 класс
|
const
k = 15;
var
x: array[1..k] of integer;
i, n, m: integer;
begin
Randomize;
Write('Введите значение N -> ');
Readln(n);
Write('Элементы массива: ');
m := 0;
for i := 1 to k do
begin
x[i] := Random(n + 1) + 1;
m := m + x[i];
Write(x[i]:4);
end;
Writeln;
Writeln('Среднее арифметическое равно ', m / k:0:4)
end.
Тестовое решение:
Введите значение N -> 50
Элементы массива: 22 31 1 35 18 41 1 35 46 12 48 27 35 37 29
Среднее арифметическое равно 27.8667
Т.е. К случайных чисел из диапазона [1;N], или набор натуральных 1,2,3,...N ?
Другие вопросы из категории
1) Какие бывают виды информации?
2) Какие бывают действия с информацией?
3) Где храниться информация?
4) Какие бывают носители информации?
5) Как передается информация?
нужно нарисовать елочку в программе кумир, с помощью чертёжника
просто напишите алгоритм
потребуется двоичный код, если алфавит. используемый племенем Мульти, содержит 64 символа! решение с Дано
Читайте также
двузначных чисел в диапазоне от А до B, в которых первая цифра ровно в 2 раза больше второй.
вычислил их среднее арифметическое и так обрадовался, что потерял число B. Помогите Васе восстановить потерянное число.
программу,используя оператор цикла While,которая будет вводить целые положительные числа не превышающие 100. Найти сумму квадратов чисел 2.Написать программу используя оператор цикла Repeat,которая будет вводить целые числа до тех пор пока не будет введён 0.Подсчитать среднее арифметическое введённых чисел.
натуральных двузначных чисел. Определить
среднее арифметическое нечетных чисел;
№3 С клавиатуры вводятся 10 натуральных двузначных чисел. Определить
верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.