УРА! Вчера 17.02.05 пришёл ответ в школу от комиссии, и у меня первое место! УРА!

Может это и есть начало... хорошего поведения на форуме?

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

cardinal Спасибо!

Задачки показать, ну они не очень сложные, но всётаки олимпиадные на QBasic?

ПОздравляю!

Perchilla

давай задачи
мы на кубейсике в 9ом классе программили....
эх.. а моя мечта выиграть мифийскую олимпиаду в 11кл или хотя бы школьные выигрывать)
пока не брали ни раз.. но ничегго... =)

На олимпиаде надо быть очень собраным, так как возможно знания есть, талант есть, а вот этого не хватает
Я так свою олимпимаду проср%л, просто просидел, а одна из членов комиссии злорадно ходила и нудила :
"А это что у тебя комментарии везде - сначала язык изучи а потом серьезными делами займись " --- для неё комментариями были "cout <<" , я когда понял, так и пал ржать....
и вообще кстати C++ не уважают на олимпиадах, вот к примеру, к моему соседу, который скорее всего занял первое место, подходили на порядок больше раз, а он паскалем баловался
Ещё поразили правила : "нельзя пользоваться макрокомандами и стандартными библиотеками" - это правило вероятно составлял идиот - хотя я и согласен, что оно направлено на то, чтобы участник сам находил решения, но мне что же переписывать теперь ввод-вывод

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

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

Цитата(En_t_end @ 19.2.2005, 06:15)

На олимпиаде надо быть очень собраным

вот это наверное одно из самых главных.
Поделюсь опытом. Прошел я на республиканскую (всеукраинскую олимпиаду по программингу). Ну и мне один препод из моего лицея сказал, что шансов у меня нет, что там сидят гипермозги и съездить можно туда ради только экскурсии....
Я конечно особо не обратил на это внимание, но где-то в глубине души они сохранились. В результате олимпиаду писал без какого-то азарта, особого желания... В итоге действительно ничего не занял, отстал от третьего места на 10 баллов из 600!. Причем когда потом анализировал решения, оказалось, что ошибки настолько тупые и просто обидные... Вот например если бы я в одной задаче в качестве компилятора написал не борланд паскаль, а фрипаскаль, то результат бы увеличился на 60 баллов! Просто фри быстрее работает иногда...
И вот так я потерял свое второе место


Так что The MASTER у тебя еще все впереди. Набирайся опыта и я советую перейти с Васика на чтонибудь другое: паскаль или С++.. Не знаю, как там у вас, но у нас в Украине Бэйсик не разрешен уже начиная с городской олимпы...

Цитата

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

Кстати, возможно это был один из вывертов препода , он наверное хотел пробудить в тебе азарт : "Ты не должен выйграть эту олимпиаду".... а ты должен был, на зло всем, её выиграть

""""С++"""" - однозначно в эту сторону смотри, в жизни пригодиться.

ЗЫ ребята с "гиперимозгами" и занимающие 1-е места на олимпиадах не обязательно станут программистами - скорее 96%, что они ими не станут. Этот парадокс находит подтверждение в реальной жизни.
Чтобы делать хорошое ПО, одной смекалки не достаточно

Цитата(Fedor @ 18.2.2005, 20:58)

Причем когда потом анализировал решения, оказалось, что ошибки настолько тупые и просто обидные... Вот например если бы я в одной задаче в качестве компилятора написал не борланд паскаль, а фрипаскаль, то результат бы увеличился на 60 баллов! Просто фри быстрее работает иногда... И вот так я потерял свое второе место smile

Я бы не сильно переживал на этот счёт. Если бы ты заработал те 60 баллов, не факт что не прогорел бы на чём нибудь другом. В любом случае следует не корить себя а подготовиться и занять первое место следующий раз.
НИКТО не вспомнит твои проигрыши в момент победы: правило по которому я учился проигрывать.

Цитата(chipset @ 19.2.2005, 08:21)

бы не сильно переживал на этот счёт. Если бы ты заработал те 60 баллов, не факт что не прогорел бы на чём нибудь другом. В любом случае следует не корить себя а подготовиться и занять первое место следующий раз.

А следующего раза у меня уже не будет... То был одиннадцатый класс, сейчас я уже выпустился...

Цитата(Fedor @ 18.2.2005, 22:24)

А следующего раза у меня уже не будет... То был одиннадцатый класс, сейчас я уже выпустился...

Есть такая штука как студенческие олимпиады. Через них можно вообще в Сеул поехать, блин, забыл как называется... АСМ, во!

Цитата(En_t_end @ 18.2.2005, 20:15)

Ещё поразили правила : "нельзя пользоваться макрокомандами и стандартными библиотеками"

Вот это идиотизмь.. К сожалению.
Добавлено @ 09:37
Чтобы не быть голословным: http://www.acm.org/

Это сообщение отредактировал(а) chipset - 19.2.2005, 09:34

En_t_end Я на самом деле пишу на Delphi и PHP, просто задачи на дурацком бейсике заставили решать!

Задача, создайте игру города на определённое кол. игроков.

Код

Print "Игрок проигрывает, если он ввёл слово PAS, ввел название которое уже было, если назвал город с неправильной буквы" DIM ig(3), ig$(3), goroda$(100) PRINT Print "Регистрация, первый игрок, введите Ваше имя" Input igr1$ ig$(1) = igr1($) Print Print "Регистрация, второй игрок, введите Ваше имя" Input igr2$ ig$(2) = igr2($) Print RANDOMIZE TIMER vb = INT(RND*2) + 1 Print "Начинает игрок "; ig$(vb) Print "Введите название города" F=0 5 INPUT gor$ pbl$ = MID$ (gor$, 1, 1) If F <> 0 Then If bk$ <> pbl$ then Print "Не правильная буква игрок ";ig$(vb) " проиграл": END If gor$ = "PAS" then Print "Игра окончена грок "; ig$(vb); " проиграл": END J = J + 1 FOR n = 1 TO J If gor$ = goroda$(n) then print "Повторение города, игра окончена игрок "; $ig(vb) " проиграл": END NEXT n goroda$(J) = gor$ dl = LEN(gor$) dl = LEN(gor$) 10 BK$ = MID$ (gor$, dl, 1) IF BK$ = "Ь" then dl = dl - 1: GOTO 10 IF BK$ = "ъ" then dl = dl - 1: GOTO 10 IF BK$ = "ё" then dl = dl - 1: GOTO 10 vb = vb +1 If vb > 2 Then vb = 1 F = 1 Print "Игрок "; ig$(vb); " Введите город на букву "; BK$ GOTO 5

Оценивайте!
Кстати может и Вам здесь новичкам код пригодится!

Поздравляю.

Кстати, прикольно. Все олимпиады, в которых я участвовал, требовали реализации какого-то достаточно неочевидного алгоритма. То есть 80% логика.

Никогда не встречал такого задания, как реализация какой-то игры. Это совсем другое направление - практическое кодирование, без сложной матлогики.

В принипе, как показывает практика, это даже более востребовано, но именно олимпиад (ограниченное время) до сих пор по этому направлению не видел.

Хуже всего что дали 2,5 часа, а так сразу на бумаге, попробуй реши, даже в голову ничего не лезет, а все задач было около 9-ти, я одну не решил, оказалась проще простого:

Программа определения процента шипящх

Код

CLS PRINT "Введите слова строки" Input q$ d = LEN(q$) FOR n = 1 TO d bk$ = MID$(q$, n, 1) IF bk$ = "ж" then sch = sch +1 IF bk$ = "ч" then sch = sch +1 IF bk$ = "ш" then sch = sch +1 IF bk$ = "щ" then sch = sch +1 NEXT n PR = (100 * SCH ) Print "Процент шипящих"; PR

Если бы я её решил, было бы 172 балла, а так всего 167!