tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу через паскаль
Написать программу через паскаль среднее арифметическое ста чисел случайным образом в массиве от 50 до 100
zina0155
1 29.08.2019 21:40
0
Ответы
89528849556keyz
06.10.2020 03:49
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(100,50,100); a.Println;
Writeln('m=',a.Average);
end.
Пример
79 81 50 65 72 67 78 88 89 61 54 71 56 90 84 93 62 57 52 59 58 53 98 83 63 61 57 68 85 98 68 93 50 88 60 96 51 97 71 90 89 62 93 78 55 59 97 72 72 90 64 74 57 87 72 75 84 68 51 60 60 60 52 92 94 62 70 69 79 88 91 65 86 62 70 96 61 69 77 54 65 86 96 96 84 94 85 64 65 85 62 84 96 60 80 79 59 51 85 94
m=73.82
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
yurkamail
07.10.2021 21:52
1. Iнвестор має $ 100. Ці гроші кладуться у банк під 10% pічних. Визначте майбутню вартість депозиту через 10 років. 2. Розрахуйте теперішню вартість внеску, який через три роки становитиме...
LOLLLAada
07.10.2021 21:51
чим відрізняється робота над фрагментами тексту у векторному редакторі Draw від роботи над ними в редакторі презинтацій?...
аы437
23.06.2020 00:01
По (m×n)-матрице сформировать m-вектор, каждый элемент которого равен количеству отрицательных элементов в соответствующей строке матрицы Я красным подчеркнул где ошибка(скорее всего).Не...
mmmmmaaaaruuu69
22.06.2020 00:22
ответить на два вопроса по Access! 1. Объяснить принципы проектирования при хранении документов учета (накладных, расходных и приходных ордеров) (раскрыть смысл табличной части). 2....
Subhinur
23.06.2020 00:23
C++ найти наибольший общий делитель двух чисел...
dominika6
23.06.2020 00:46
Составить программу вычисления функции на языке PASCAL(номер 1 и 3)...
масяня194
22.06.2020 12:44
Ввести двумерный массив . Каждый элемент, стоящий в массиве на позиции с четной суммой индексов заменить остатком от деления этого элемента на 7. Массив вывести до и после преобразования....
evgenijpetrov
22.06.2020 00:56
Написать программу для вычисления функции при введенном значении Х на языке Pascal Функции f. (x) 9.2 cos.x2 - sin x 1. 1 12.4sin x 2.1 8,3cos1.2x cos x 2.7 + 9.1sin(1.2x + 1)sin x...
agusin813
23.06.2020 01:24
Вычислить значение n! 1 ≤ n ≤ 12 Важно: n! = 1 × 2 × … × n Пример: 3! = 1 × 2 × 3 = 6...
Математика666
22.06.2020 02:25
Написать программу на C# для подсчёта веса человека в граммах – принимает вес в фунтах надо!...
Популярные вопросы
Боковая сторона трапеции равна 4, а один из прилегающих к ней углов равен 30°. Найдите...
1
Найдите угол АСО, если его сторона СА касается окружности, О — центр окружности,...
3
Сторона ромба равна 26, а острый угол равен 60°. Высота ромба, опущенная из вершины...
3
На рисунке изображён колодец с «журавлём». Короткое плечо имеет длину 2 м, а длинное...
2
Найдите угол АСО, если его сторона СА касается окружности, О — центр окружности,...
3
В треугольнике АВС углы А и С равны 40° и 60° соответственно. Найдите угол между...
3
Точка крепления троса, удерживающего флагшток в вертикальном положении, находится...
2
В параллелограмме АВСD точки E, F, K и М лежат на его сторонах, как показано на...
1
В треугольнике ABC угол C прямой, BC=4, sinA=0,8. Найдите AB...
1
Медиана BM и биссектриса AP треугольника ABC пересекаются в точке K, длина стороны...
1
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(100,50,100); a.Println;
Writeln('m=',a.Average);
end.
Пример
79 81 50 65 72 67 78 88 89 61 54 71 56 90 84 93 62 57 52 59 58 53 98 83 63 61 57 68 85 98 68 93 50 88 60 96 51 97 71 90 89 62 93 78 55 59 97 72 72 90 64 74 57 87 72 75 84 68 51 60 60 60 52 92 94 62 70 69 79 88 91 65 86 62 70 96 61 69 77 54 65 86 96 96 84 94 85 64 65 85 62 84 96 60 80 79 59 51 85 94
m=73.82