Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Назар212
0 / 0 / 0
Регистрация: 16.11.2017
Сообщений: 35
#1

Сгенерировать массив и выполнить заданные действия с использованием значений элементов массива - Turbo Pascal

06.12.2017, 22:13. Просмотров 71. Ответов 1
Метки нет (Все метки)

С созданным массивом B[1.20] с элементами B[i]=random(50) выполнить задания:

1)найти количество минимальных элементов массива
2)вывести элементы, значение которых меньше, чем среднее арифметическое всех элементов
3)вычислить сумму квадратов элементов, значения которых меньше 20
4)вычислить сумму тех элементов, значения которых больше, чем 5
5)вычислить сумму элементов, индексы которых нечетные
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.12.2017, 22:13
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Сгенерировать массив и выполнить заданные действия с использованием значений элементов массива (Turbo Pascal):

Создать массив и выполнить заданные действия с использованием значений элементов массива - Turbo Pascal
1) все положительные элементы массива А занести в другой массив 2) записать на место отрицательных элементов нули и напечатать созданный...

Выполнить следующие операции с созданным файлом действительных чисел - Turbo Pascal
. Записать в файл N действитель¬ных чисел. Выполнить следующие операции с созданным файлом: - Написать программу, которая ищет...

Выполнить задания - Turbo Pascal
Помогите пожалуйста написать такие программы

Выполнить следующие задания - Pascal
Выполнить следующие задания a:=4; b:=9; if a>b then x:= a else x:=b; write (x);

Выполнить заданные операции с массивом - Turbo Pascal
Решите пожалуйста следующую задачу: Дан массив a1, a2,…, a10. Вычислить среднее арифметическое SA всех элементов и подсчитать, во...

Выполнить заданные действия с одномерным массивом - Pascal
Для каждого задания нужна отдельная программа, желательно сделать все предельно простыми методами, т.к много мы не проходили. В...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3840 / 2827 / 1942
Регистрация: 05.06.2014
Сообщений: 13,841
07.12.2017, 08:18 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
1. Определить количество минимальных элементов массива
2. В массиве Х(N) найти количество элементов, которые меньше значения среднего арифметического
3..5
Pascal
1
2
3
4
5
6
7
8
9
sk:=0;
s:=0;
sn:=0;
for i:=1 to n do
 begin
  if a[i]<20 then sk:=sk+sqr(a[i]);
  if a[i]>5 then s:=s+a[i]);
  if  not odd(i) then sn:=sn+a[i]);
 end;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.12.2017, 08:18
Привет! Вот еще темы с ответами:

Выполнить заданные действия с целочисленным массивом - Turbo Pascal
В заданном целочисленном массиве определить: а) есть ли в данном массиве два соседних отрицательных элемента? Найти номера первой...

Выполнить следующие задания для квадратной символьной матрицы порядка n - Turbo Pascal
Выполнить следующие задания для квадратной символьной матрицы порядка n. Определить номер последней по порядку строки, в которой ...

Выполнить следующие задания, используя перечисляемые типы, приведенные во фрагменте программы - Turbo Pascal
Var T : array of (V, H, P, X); T – таблица результатов шахматного турнира, в котором участвовало n шахматистов, T = V, если i участник...

!Составление меню!Выполнить на ПК программу создания файла в соответствии с вариантом задания. - Pascal
1.)Выполнить на ПК программу создания файла в соответствии с вариантом задания. 2.)Выполнить на ПК программу обработки созданного файла,в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru