Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
Назар212
0 / 0 / 0
Регистрация: 16.11.2017
Сообщений: 35
#1

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

06.12.2017, 22:13. Просмотров 675. Ответов 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
Ответы с готовыми решениями:

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

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

Выполнить заданные действия с одномерными массивами
Контрольная 11 класс!с задачей! ПАСКАЛЬ 2. Найти ошибки в программе, которая...

Выполнить заданные действия с целочисленным массивом
В заданном целочисленном массиве определить: а) есть ли в данном массиве два...

Сформировать массив по заданному правилу и произвести с ним заданные действия
Написать программу, которая заполняет массив из 5х5 элементов: в 1-й строке...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3862 / 2848 / 3632
Регистрация: 05.06.2014
Сообщений: 13,964
07.12.2017, 08:18 #2
Лучший ответ Сообщение было отмечено Назар212 как решение

Решение

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

Двумерный массив. Выполнить необходимые действия
Здравствуйте! Помогите, пожалуйста, найти ошибку в программном коде. Заранее...

Сожмите заданный массив A(N) отбрасыванием нулевых элементов. Выполнить вывод на печать полученного массива
Сожмите заданный массив A(N) отбрасыванием нулевых элементов. Выполнить вывод...

Сгенерировать массив, содержащий 40 целых случайных значений из заданного диапазона
1) Написать программу на языке Pascal, которая генерирует массив, содержащий...


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

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

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