В массиве найти 3 максимальных числа и вывести их по убыванию

@Вита456 · Регистрация: 01.10.2012

Студворк — интернет-сервис помощи студентам

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

В поиске искала, там не нашлось решения.

@Апострофф · 05.11.2012, 11:28

В массиве найти 3 максимальных числа и вывести их по убыванию

Не по теме:

Только не говорите, что Вам на QBasic`е надо:)

@Вита456 · 05.11.2012, 12:29 **[ТС]**

Сообщение от Апострофф

В массиве найти 3 максимальных числа и вывести их по убыванию

Не по теме:

Только не говорите, что Вам на QBasic`е надо:)

а если мне действительно нужно на бейсике)) я вижу что там на Visual Basic, ну у меня про учеников и средний балл. а надо еще этот средний балл как-то вывести, в смысле чтоб массив средних баллов появился, конкретику надо...

@Апострофф · 05.11.2012, 14:55

Не по теме:

Сообщение от Вита456

Дан список учеников класса, содержащий фамилии и средний балл.

Сообщение от Вита456

а надо еще этот средний балл как-то вывести, в смысле чтоб массив средних баллов появился

Вы уж определитесь для начала с тем что есть и тем что надо...

@Вита456 · 05.11.2012, 15:08 **[ТС]**

Сообщение от Апострофф

Не по теме:

Вы уж определитесь для начала с тем что есть и тем что надо...

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

Добавлено через 1 минуту
только не надо меня потом истеричкой и тупой дурой считать... (

@Апострофф · 05.11.2012, 15:14

Не по теме:

Вита456, зря Вы затеваете полемику на пустом месте!
Почитайте правила (п. 4.7 в частности)
Сформулируйте вопрос нормально и всё получится:-[

@Вита456 · 05.11.2012, 15:21 **[ТС]**

Ок, почитала. ничего не получится. я неудачница.

@Апострофф · 05.11.2012, 15:43

Ну хоть исходные приложить смогли бы?
Так ли -

ФамилияИО	Астрология	Хиромантия	ГущаКофейная
Иванов	2	3	4
Пупкин	5	4	3

@Вита456 · 05.11.2012, 16:05 **[ТС]**

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

@Апострофф · 05.11.2012, 16:16

Сообщение от Вита456

вы придумать предлагаете мне его что ли?

А чё бы не придумать? По крайней мере стало бы понятно - есть средний балл или его ещё найти надо?

@Вита456 · 05.11.2012, 16:20 **[ТС]**

ну если в задаче написано, что дан список класса и средний балл ученика, то значит в природе он уже есть этот балл и его не нужно находить.....

@Апострофф · 05.11.2012, 17:56

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
CONST u = 5 'учеников без нулевого, т.е. всего u+1
DIM y(u) AS STRING 'ученики
y(0) = "Иванов"
y(1) = "Петров"
y(2) = "Сидоров"
y(3) = "Козлов"
y(4) = "Баранов"
y(5) = "ПупкинЯЯ"
DIM o(u) AS SINGLE 'оценки(усреднённые)
o(0) = 1.1
o(1) = 2.2
o(2) = 3.3
o(3) = 4.4
o(4) = 5.5
o(5) = 0#
DIM i AS INTEGER 'счётчик
DIM Max1 AS SINGLE
DIM Max2 AS SINGLE
DIM Max3 AS SINGLE
FOR i = 0 TO u
  IF o(i) > Max1 THEN
    Max3 = Max2
    Max2 = Max1
    Max1 = o(i%)
  ELSEIF o(i%) > Max2 THEN
    Max3 = Max2
    Max2 = o(i%)
  ELSEIF o(i%) > Max3 THEN
    Max3 = o(i%)
  END IF
NEXT i%
PRINT Max1
PRINT Max2
PRINT Max3

Нет исходных данных, не знаем, что хотим, QB давно забыл

, пробуйте

@Quiet Snow · 05.11.2012, 18:41

Апострофф, не надо с ними няньчиться, Вита456 правила п.4.7 уточняем условие
и описываем задачу полностью, экстрасенсов тут нету, гадалки тоже закончились,
нет условия - ваши личные проблемы. Мы ещё должны думать, что вам там задали.

@кот Бегемот · 06.11.2012, 09:15

Вита456, если в условии написано, что даны фамилии и средний балл, смело можете заполнять массивы с помощью input, а далее находить три максимальных значения например так, как вам написали

@Вита456 · 06.11.2012, 17:06 **[ТС]**

А что уточнять то? это и есть всё условие что у меня есть, больше мне никаких уточнений не давали. только вот это и дали условие "Дан список учеников класса, содержащий фамилии и средний балл. Вывести на печать фамилии трех лучших по среднему баллу учеников."

Добавлено через 55 минут
Апострофф, он фамилии не вывел, а просилось вывести фамилии лучших по баллу, что надо написать чтоб вывел фамилии?

Комментарий модератора

Не цитируйте посты целиком. Обращайтесь по нику. Если цитата необходима - цитируйте только важную часть, на которую даете ответ.

@кот Бегемот · 06.11.2012, 17:10

ищите элементы параллельно, в обоих массивах.
То есть, 3 максимума и три соответствующих им фамилии

@Quiet Snow · 07.11.2012, 07:00

ищите элементы параллельно, в обоих массивах.

Для этого есть структуры или по-простецки UDT.

Добавлено через 44 минуты

А что уточнять то?

Всё. Ввод данных, придумать самим данные при необходимости, алгоритм(т.к. сбили вы всех
с толку своей сортировкой, определитесь - надо оно вам или не надо, для данной задачи
сортировка - неэффективна), уточнить всё, чтобы не было этого:

а надо еще этот средний балл как-то вывести, в смысле чтоб массив средних баллов появился

. Объясните русским языком, как может появиться массив средних баллов,
если он дан вам по условию?
И после всей этой "каши" вы хотите чтобы все поняли, что вам нужно?

P.S: Подозреваю, что задача на типы данных, а формулировка такая:
Дан список учеников класса. Для каждого ученика он содержит фамилию и баллы по каждому
предмету. Вывести на экран фамилии трех лучших по среднему баллу учеников.

Решается элементарно: Создаётся UDT с предметами и фамилиями, заводим массив, забиваем
данные(не менее 3-х), пробегаемся по ученикам и находим все средние баллы в отдельном
масиве(а можно и в UDT, чтобы целостнее), присваиваем максимумам первые 3 средних балла
по порядку(+запомним индексы т.е. 1,2,3), сортируем эти 3 максимума условиями по убыванию,
далее в цикле по каждому ученику сравниваем только самый первый максимум со средним
баллом, если средний балл больше, то приравниваем 3-й максимум второму, второй первому, а
первый этому среднему баллу. Естественно доп. находим индексы элементов, чтобы вывести
фамилии.

@Апострофф · 07.11.2012, 08:53

А можно с минимальными переделками -

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
CLS
CONST u = 5 'учеников без нулевого, т.е. всего u+1
DIM y(u) AS STRING 'ученики
y(0) = "Иванов"
y(1) = "Петров"
y(2) = "Сидоров"
y(3) = "Козлов"
y(4) = "Баранов"
y(5) = "ПупкинЯЯ"
DIM o(u) AS SINGLE 'оценки(усреднённые)
o(0) = 1.1
o(1) = 2.2
o(2) = 3.3
o(3) = 4.4
o(4) = 5.5
o(5) = 0#
DIM i AS INTEGER 'счётчик
DIM Max1 AS INTEGER 'Single
DIM Max2 AS INTEGER 'Single
DIM Max3 AS INTEGER 'Single
FOR i = 0 TO u
  IF o(i) > o(Max1) THEN
    Max3 = Max2
    Max2 = Max1
    Max1 = i
  ELSEIF o(i) > o(Max2) THEN
    Max3 = Max2
    Max2 = i
  ELSEIF o(i) > o(Max3) THEN
    Max3 = i
  END IF
NEXT i
PRINT y(Max1), o(Max1)
PRINT y(Max2), o(Max2)
PRINT y(Max3), o(Max3)

@Вита456 · 07.11.2012, 16:44 **[ТС]**

Апострофф, а мы не проходили вот эти слова

Сообщение от Апострофф

AS STRING

Сообщение от Апострофф

AS SINGLE

Сообщение от Апострофф

AS INTEGER

можно без них обойтись в программе?

@Апострофф · 07.11.2012, 16:58

QBasic/QuickBASIC
1
DIM y(u) AS STRING 'ученики

=

QBasic/QuickBASIC
1
DIM y$(u) 'ученики

Аналогично
AS SINGLE = !
AS INTEGER = #

Это Вы проходили?

Новые блоги и статьи Все статьи Все блоги /
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .

@Вита456 0 / 0 / 0 Регистрация: 01.10.2012 Сообщений: 26

	В массиве найти 3 максимальных числа и вывести их по убыванию 05.11.2012, 09:56. Показов 2505. Ответов 20 Метки нет (Все метки) Дан список учеников класса, содержащий фамилии и средний балл. Вывести на печать фамилии трех лучших по среднему баллу учеников. В поиске искала, там не нашлось решения. 0

@Апострофф 9908 / 3919 / 742 Регистрация: 11.10.2011 Сообщений: 5,902
	05.11.2012, 11:28
	В массиве найти 3 максимальных числа и вывести их по убыванию Не по теме: Только не говорите, что Вам на QBasic`е надо:) 0

@Апострофф
	05.11.2012, 15:14
	Не по теме: Вита456, зря Вы затеваете полемику на пустом месте! Почитайте правила (п. 4.7 в частности) Сформулируйте вопрос нормально и всё получится:-[ 0

@Вита456 0 / 0 / 0 Регистрация: 01.10.2012 Сообщений: 26
	05.11.2012, 15:21 [ТС]
	Ок, почитала. ничего не получится. я неудачница. 0

@Вита456 0 / 0 / 0 Регистрация: 01.10.2012 Сообщений: 26
	05.11.2012, 16:05 [ТС]
	Дак нет никаких исходных данных, это просто нам дали задачу и надо программу написать к ней методом пузырька. и дан нам список класса, а где я ей этот список возьму,вы придумать предлагаете мне его что ли? 0

@Вита456 0 / 0 / 0 Регистрация: 01.10.2012 Сообщений: 26
	05.11.2012, 16:20 [ТС]
	ну если в задаче написано, что дан список класса и средний балл ученика, то значит в природе он уже есть этот балл и его не нужно находить..... 0

@Quiet Snow Кормпилятор 5044 / 1718 / 409 Регистрация: 25.04.2010 Сообщений: 4,827 Записей в блоге: 2
	05.11.2012, 18:41
	Апострофф, не надо с ними няньчиться, Вита456 правила п.4.7 уточняем условие и описываем задачу полностью, экстрасенсов тут нету, гадалки тоже закончились, нет условия - ваши личные проблемы. Мы ещё должны думать, что вам там задали. 0

@кот Бегемот Платежеспособный зверь 8964 / 4387 / 1654 Регистрация: 28.10.2009 Сообщений: 11,645
	06.11.2012, 09:15
	Вита456, если в условии написано, что даны фамилии и средний балл, смело можете заполнять массивы с помощью input, а далее находить три максимальных значения например так, как вам написали 0

@кот Бегемот Платежеспособный зверь 8964 / 4387 / 1654 Регистрация: 28.10.2009 Сообщений: 11,645
	06.11.2012, 17:10
	ищите элементы параллельно, в обоих массивах. То есть, 3 максимума и три соответствующих им фамилии 0

В массиве найти 3 максимальных числа и вывести их по убыванию

Решение