Напишите па Паскале программу, которая запрашивает с клавиатуры массив из N чисел, а затем выводит среднее арифметическое всех элементов
10-11 класс
|
массива.
program asd;
USES crt;
Var A:array[1..100500] of integer;
i,s,n:integer;
sr:real;
BEGIN
Write('Vvedite n: ');
Readln(n);
For I:=1 to n do
begin
A[i]:=random(10);
Write(A[i]:3);
end;
For I:=1 to n do
begin
S:=S+A[i];
SR:=s/n;
end;
Writeln;
Writeln('Srednee arifm. : ',sr);
END.
Другие вопросы из категории
(Не большой текст)
мой день рождения, собрались все наши друзья и мы играли в игру числа Фибаначчи.
Написать номер телефона первого шпиона.
1) первоклассник, семиклассник и ученик 11 класса получают разную информацию из вашего учебника информатики;
2) каждый из семиклассников, работая с одним и тем же учебником, получает разное кол-во информации.
Как вы можете это объяснить?
Читайте также
2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
ко нулей. Разработать для программы не менее двух тестов и доказать правильность её работы.
принимать значения от 0 до 1000.описать на русском или на одном из языков програмирования алгоритм,который находит и выводит среднее арифметическое всех элементов массива,имеющих нечетное значение
программирования алгоритм, который находит и выводит среднее арифметическое всех элементов массива, оканчивающихся цифрой 5. Гарантируется, что хотя бы один такое элемент в массиве есть.
НАРОД ПОМОГИТЕ ПОЖАЛУЙСТА
подсчитать среднее арифметическое положительных элементов массива, которые кратны первому элементу массива. №2. Дан массив из 40 элементов. Каждый элемент может принимать целочисленные значения от 0 до 200. Напишите программу, которая позволит найти наиболее часто встречающийся элемент массива