Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Milena ok
2 / 1 / 1
Регистрация: 08.12.2011
Сообщений: 30
1

Как подсчитать количество элементов ai, которые не меньше всех предыдущих элементов массива

10.12.2012, 11:49. Просмотров 1049. Ответов 3
Метки нет (Все метки)

Дан числовой массив a(n). Подсчитать количество элементов ai, которые не меньше всех предыдущих элементов массива.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.12.2012, 11:49
Ответы с готовыми решениями:

Найти количество элементов массива, которые меньше или равны 10
Доброго дня, помогите решить задачку: Найти колличество элементов в массиве, которые меньше или...

Подсчитать количество таких і, для который F[i] не меньше всех предыдущих элементов массива
2.Создать программу для подсчета количества таких і в цел.мас. F, для который F не меньше всех...

Дан числовой массив.Посчитать количество его элементов, которые не меньше всех предыдущих
Ребят,пожалуйста,если не сложно, напишите как делать...А то вообще не понимаю как делать=( Дан...

Дан вещественный вектор А(н). Подсчитать количество таких i, что А [i] не меньше всех предыдущих элементов вектора (А [1
Здравствуйте, задание делаю в делфи 7, правильно ли я его сделал задание? Подскажите пожалуйста, а...

Подсчитать количество элементов файла f, которые меньше среднего арифметическое всех элементов файла
Помогите пожалуйста написать программу! Вот задание: Type reals = file of real; var f:reals. ...

3
OldFedor
7471 / 4135 / 474
Регистрация: 25.08.2012
Сообщений: 11,525
Записей в блоге: 11
10.12.2012, 12:21 2
Цитата Сообщение от Milena ok Посмотреть сообщение
Подсчитать количество элементов
1. Водится массив размерностью n
2. Оформляется два цикла
- внешний по i от 2 до n
- внутренний от j=1 до i-1
3. Во внутреннем цикле через if проверяете - текущий a(j) >= a(i) и если да,
то переменную kol увеличиваете на 1.
После внутреннего цикла вывод текущего kol.

Удачи.
0
sco43
670 / 163 / 22
Регистрация: 27.01.2012
Сообщений: 372
10.12.2012, 13:17 3
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub Command1_Click()
Dim a(1 To 10)
For i = 1 To 10
 a(i) = Int(Rnd(1) * 10)
 Print a(i);
Next i
Print
 
k = 0
For i = 2 To 10
 For j = 1 To i - 1
  If a(i) >= a(j) Then
   k = k + 1
   Exit For
  End If
 Next j
Next i
Print k
 
 
End Sub
0
OldFedor
7471 / 4135 / 474
Регистрация: 25.08.2012
Сообщений: 11,525
Записей в блоге: 11
10.12.2012, 13:30 4
Цитата Сообщение от sco43 Посмотреть сообщение
Код Visual Basic
Надеялся, что словесного описания достаточно и напишет сам.

Добавлено через 55 секунд
Print k
Желательно поставить выше. Этих значений много
1
10.12.2012, 13:30
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.12.2012, 13:30

Подсчитать количество элементов одномерного массива, которые превосходят среднее арифметическое всех элементов массива
Подсчитать количество элементов одномерного массива, которые превосходят среднее арифметическое...

В данном линейном массиве действительных чисел найти количество элементов, которые меньше среднего арифметического всех элементов этого массива
помогите!!!!!!! В данном линейном массиве действительных чисел найти количество элементов,...

Найти количество элементов массива, больших всех предыдущих элементов
найти количество элементов массива, больших всех предыдущих элементов.


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

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

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