forum.boolean.name - Помагите решить задачу

Страница 1 из 2

Показывать 64 сообщений этой темы на одной странице

forum.boolean.name (http://forum.boolean.name/index.php)

- Visual Basic (http://forum.boolean.name/forumdisplay.php?f=62)

- - Помагите решить задачу (http://forum.boolean.name/showthread.php?t=7492)

Sliver

23.12.2008 22:44

Помагите решить задачу

Помагите пожалуйста...

Задан целостный массив А10.Упорядочить по возрастанию те элементы массива которые стоят на нечетных местах.

jimon

24.12.2008 00:08

Ответ: Помагите решить задачу

тебе подойдет вот этот алгоритм
http://ru.wikipedia.org/wiki/Сортировка_выбором
только надо основной цикл алгоритма пускать не по всем елементам, а только по нечетным и поиск минимального только среди нечетных делать

Atomikc

25.12.2008 20:00

Ответ: Помагите решить задачу

Эхехе... вобщем надо чтоб нажал кнопку "кнопка" и оно вывело все нечётноые числа по возростанию на примере:
1 3 5 7 9 ..... итд до 99 ...
.................................................. .................................................. ....
Зы... понятное дело, что моно смухлевать было бы (я так всегда делаю, преподы ламеры), но это ксожалению исключение ... надо через масив...
Эхехе... Пора уже учить этот визуал безик самому.. да некогда....

Цитата:

Option Explicit

Private Sub Command1_Click()
' Упорядочить одномерный массив по возрастанию

Dim i As integer
Dim ip As integer
Dim max As integer
Dim imax As integer
Const N = 5
Dim Mas(0 To 10) As integer

' Очистить форму
Cls

' Заполняем массив случайными числами
For i = 0 To 10
Mas(i) = Int(Rnd * 50)
Print Mas(i);
Next i
Print

For ip = 0 To 10
max = Mas(ip)
imax = ip

For i = ip + 1 To N

If Mas(i) < max Then max = Mas(i): imax = i
Next i
Mas(imax) = Mas(ip)
Mas(ip) = max
Next ip

' Вывести упорядоченный массив на экран
For i = 0 To N
Print Mas(i);
Next i
End Sub

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

jimon

25.12.2008 20:42

Ответ: Помагите решить задачу

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

Sliver

25.12.2008 22:35

Ответ: Помагите решить задачу

а как отсортировать числа которые стоят на нечётных местах? а то что то не получается(((

jimon

25.12.2008 22:45

Ответ: Помагите решить задачу

Sliver
читай второй пост в этой теме, я написал уже

IGR	26.12.2008 20:42

Ответ: Помагите решить задачу

Цитата:

я так всегда делаю, преподы ламеры

... это проблема !! радоватся или расстраиватся ??
если они ламеры, то чего они могут научить ?? т.е. если хочеш знать, придется учится самому !! ну а зачем тогда идти учится в Универ, платить деньги за учебу ??
Но в то же время это наруки "студентам" которые хотят "отбыть номер" !!
тут непонятно: или преподавателя попросту "неколышит" что там студент здает или он действительно "ламер" !!
Я конешн тож не святоша, и часто здаю "тяп-ляп", но это только из-за нехватки времени...
упреподавателей нет стимула вникать в роботу студента, им важен отчет - ОЦЕНКА !! что бы потом отчитатся перед теми кто выше !!

незнаю как у Вас, но у нас образование катится в большую Ж* !!

jimon

26.12.2008 20:45

Ответ: Помагите решить задачу

ABTOMAT

26.12.2008 22:20

Ответ: Помагите решить задачу

Цитата:

Угум-с, это труЪ проблема :( я уже давно потерял надежду на то, что где-то меня будут учить программированию или алгоритмике :( Хотя... в яслях/школе/ВУЗе обычно преподают совершенно не то, что нужно на практике, если бы ещё этим сильно е..ли мозги, то учиться самому чему-то реально полезному не оставалось бы совершенно времени :(

Цитата:

ну а зачем тогда идти учится в Универ, платить деньги за учебу ??

Конкретно по этому вопросу: мне лично от ВУЗа нужен диплом с печатью. И больше ничего. В нашей образовательной системе я давно разочаровался.

Atomikc

26.12.2008 22:40

Ответ: Помагите решить задачу

Да. Я незнаю чему они учат.... Несмотря на общюю грамотность студентов, преподы сами не могут дж сканер настроить.... а преподают информатику, программироввние итп.. Благо это тоолько в информационной отрасли, с оснавными предметами полутьше...
Ну и как сказал АВТОМАТ, мне нужен только диплом..

newman

26.12.2008 22:41

Ответ: Помагите решить задачу

ABTOMAT, аналогично. В школе информатику вообще не преподают. Сначало все забили на учителя, ну а потом учительна класс. При чём это не только в нашем классе. Сейчас хоть учитель по алгебре\геометрии пршёл новый, но старой закалки. Требует сильно, но зато хоть какой то результат. В уневер тоже пойду только ради диплома :)

xsnakes

18.07.2009 12:38

Ответ: Помагите решить задачу

Как на языке VBA добавить в ImageCombo цветовые константы с картинкой соответствующего цвета константе цвета. Ужас, сам непонял чё сказал :)
Короче хочется ImageCombo такойже как у VB в свойствах де BackColor например.
Помагите решить такую задачю! :)

Данил

20.07.2009 01:18

Ответ: Помагите решить задачу

Слушайте, так говорите, а если б лично человек не знал программирование, ну не занимался этим, а препод был типа АВТОМАТа, который учил, но компоссировал мозги - что бы было?)
те, кому надо - учатся, как им надо, читая при этом доп.литературу и проводя самообучение некоторое, а некоторые - тупо на отмазку сдают что могут и все.

посмотрим на школьную информатику - блин, обычная "девочка "приффет фсем в этом чате чмокипоки" - ей это программирование надо? врятли. А кому все-таки действителньо надо, т.е. в пример того же АВТОМАТа возьмем - научился сам. и знает теперь побольше всех остальных.

ведь человек идет по специальности программиста не на абум же, а зная, на что он идет, и уже в большинства случаях, уже многому самообучен. а те, кто не знают, и каким-то странным образом попали на эту специальность - вылетят через время, и пойдут вон в слесари.

SBJoker

20.07.2009 01:42

Ответ: Помагите решить задачу

Цитата:

Сообщение от Данил (Сообщение 111320)

а те, кто не знают, и каким-то странным образом попали на эту специальность - вылетят через время, и пойдут вон в слесари.

ну или в банкиры или в менеджеры.. или ещё куда где рабоать ненадо.

impersonalis

20.07.2009 02:03

Ответ: Помагите решить задачу

2Данил материться излишне.

Цитата:

по специальности программиста не на абум же, а зная, на что он идет, и уже в большинства случаях, уже многому самообучен.

логика есть и в обратном:
" я в программеры пойду - пусть меня научат".

Часовой пояс GMT +4, время: 13:29.

Страница 1 из 2

Показывать 64 сообщений этой темы на одной странице