сервис вопросов и ответовсоздать массив а из десяти целых чисел, принадлежащих промежутку [0;20). вывести полученный массив на экран. вычислить количество элементов массива,
10-11 класс|
|
значения которых превышают средне арифметическое значений его элементов
Huramsh
26 окт. 2016 г., 22:47:51 (7 лет назад)
Alinabarzilovs
27 окт. 2016 г., 1:45:00 (7 лет назад)
var a:array[1..10] of integer;i,k:integer;q:real;
begin
for i:=1 to 10 do begin
a[i]:=random(20);
writeln(a[i]);
q:=q+a[i];
end;
q:=q/10;
for i:=1 to 10 do
if a[i]>q then inc(k);
writeln('Чисел превышающих среднее: ',k);
end.
Ответить
Другие вопросы из категории
составьте программу ,которая
заполняет массив а[1..10] случайными целыми числами в диапазоне от 1 до 10 и находит количество элементов,которые больше своего соседа слева
1)Напишите программу, которая вычисляет минимальное из трёх введённых чисел. Используйте функцию.
2)Наибольший общий делитель (НОД) двух или нескольких чисел – это наибольшее число, на которое делятся все заданные числа. Напишите программу, которая вычисляет НОД двух чисел. Используйте функцию.
3)Наименьшее общее кратное (НОК) двух натуральных чисел – это наименьшее число, которое делится нацело на оба исходных числа. Напишите программу, которая вычисляет НОК двух чисел. Используйте функцию.
4)Ряд чисел Фибоначчи задается следующим образом: первые два числа равны 1 ( F 1 = F 2 = 1 ), а каждое следующее равно сумму двух предыдущих: F i = F i - 1 + F i - 2 . Напишите программу, которая вводит натуральное число N и выводит N -е по порядку число Фибоначчи. Используйте функцию.
составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет среднее арифметическое нечётных чисел.
только чтобы правильно было...помогите плииз!!!!
Читайте также
найти сумму квадратов натуральных чисел от 15 до 25. Создать массив а из десяти целых чисел принадлежащих промежутку [0;25) Вывести полученный массив на
экран. подсчитать k-количество элементов массива значение которых превышает 12 ПОМОГИТЕ СРОЧНО
Люди помогайте!!!))) Паскаль!!!
1)Составьте программу, которая заполняет массив 10-ю случайными целыми числами в диапазоне [1..20] и выводит на экран элементы массива в нечетными значениями.
2)Составьте программу заполнения массива из десяти чисел следующими значениями
а) 2 4 6 8 10 (+ 2)
б)3 6 9 12 15 (+3)
задать циклы для решения задачи: формирует массив Е из 162 случайных чисел принадлежащих промежутку[15:30]. Параметром цикла является переменная X.
Нумерация начинается с 1.
Составить программу на языке Паскаль: 1)Для массива K из 12 вещественных чисел определить сколько элементов массива меньше 0. 2)В массиве М из 10 целых
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
1. Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите среднее арифметическое нечетных элементов массива с нечетными
индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы
Вы находитесь на странице вопроса "создать массив а из десяти целых чисел, принадлежащих промежутку [0;20). вывести полученный массив на экран. вычислить количество элементов массива,", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.