Составить программу Pascal для задачи: Найти количество элементов массива А (10), значения которых лежат между средним арифметическим элементов массива В (10) и средним геометрическим элементов массива С (10). Данные задать самостоятельно.
«Составить программу Pascal для задачи: Найти количество элементов массива А (10), значения которых лежат между средним арифметическим элементов массива В (10) и средним геометрическим элементов массива С (10). Данные задать самостоятельно.»
- Информатика
Условие:
Составить программу Pascal для задачи:
Найти количество элементов массива А (10), значения которых лежат между средним арифметическим элементов массива В (10) и средним геометрическим элементов массива С (10). Данные задать самостоятельно.
Решение:
Текст программы
var a: array[1..10] of integer; b: array[1..10] of integer; c: array[1..10] of integer; sr_b, sr_c: double; i, col: integer;begin sr_b:= 0; sr_c:= 1; col:= 0; write('a: '); for i:= 1 to 10 do begin a[i]:= Random(100); write(a[i], ' '); end; writ...
Похожие задачи
Не нашел нужную задачу?
Воспользуйся поиском
AI помощники
Выбери предмет
S
А
Б
В
Г
И
К
М
П
- Правоохранительные органы
- Пожарная безопасность
- Парикмахерское искусство
- Природообустройство и водопользование
- Почвоведение
- Приборостроение и оптотехника
- Промышленный маркетинг и менеджмент
- Производственный маркетинг и менеджмент
- Процессы и аппараты
- Программирование
- Право и юриспруденция
- Психология
- Политология
- Педагогика
С
Т
- Трудовое право
- Теория государства и права (ТГП)
- Таможенное право
- Теория игр
- Теория вероятностей
- Теоретическая механика
- Теория управления
- Технология продовольственных продуктов и товаров
- Технологические машины и оборудование
- Теплоэнергетика и теплотехника
- Туризм
- Товароведение
- Таможенное дело
- Торговое дело
- Теория машин и механизмов
- Транспортные средства
Ф
Э