Улучшение лотереи, Кено |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Улучшение лотереи, Кено |
Anastacia Adesso |
6.12.2006 19:17
Сообщение
#1
|
Пионер Группа: Пользователи Сообщений: 92 Пол: Мужской Реальное имя: Stanislav Репутация: 0 |
Уф только что домучила программу..
Типа розыгрыш лотереи. Всё выбираешь, отвечает что уже сделала... Но... Не пойму как в неё забить табличку с коэфициентами, чтоб узнать выигранную сумму.. Если через массивы..Врядли выйдет нечто хорошее. А выигранную сумму вычисляем так- верхняя строка-количество твоих чисел первый столбик-угаданные числа коэфициент из таблицы умножается на ставку.. Плиз...Спасайте RUS.PAS ( 1.67 килобайт ) Кол-во скачиваний: 267 keno.txt ( 493 байт ) Кол-во скачиваний: 299 -------------------- Ben sensiz yaşayamam
|
volvo |
6.12.2006 19:46
Сообщение
#2
|
Гость |
Если я не ошибаюсь, вот так:
table:Зачем коэффициент для 0 - не понимаю ... |
Anastacia Adesso |
6.12.2006 19:56
Сообщение
#3
|
Пионер Группа: Пользователи Сообщений: 92 Пол: Мужской Реальное имя: Stanislav Репутация: 0 |
А вот для 0 это такой прикол..
Если ставил на от 4 и более цифр и не угадал, то получаешь свою ставку обратно. Это я в правилах читала.. Знаешь, через массив тока что пошло, правда пришлось забить каждый отдельно коэфициент.. Уф ну и намаялася я Спасиб -------------------- Ben sensiz yaşayamam
|
volvo |
6.12.2006 20:01
Сообщение
#4
|
Гость |
Цитата правда пришлось забить каждый отдельно коэфициент.. А слово Const перед тем, что я выше привел написать никак нельзя было? |
Anastacia Adesso |
7.12.2006 9:48
Сообщение
#5
|
Пионер Группа: Пользователи Сообщений: 92 Пол: Мужской Реальное имя: Stanislav Репутация: 0 |
Гмм... вот ещё прикол в том, что как и все преподы, мой не очень любит, когда используют то, чего мы не проходили.
Вот table мы типа ещё не знаем.. А получилось кое-что симпатичное RUS.PAS ( 2.31 килобайт ) Кол-во скачиваний: 267 Мдааа... я какую-то чепуху несу. Собственно говоря, какой ещё table.. Поняла, ща сделаю, красивей выглядит твой вариант -------------------- Ben sensiz yaşayamam
|
volvo |
7.12.2006 10:05
Сообщение
#6
|
Гость |
Кстати, при моем варианте вот это:
if count=0 thenможно сразу удалить Оно уже есть в таблице... |
Anastacia Adesso |
7.12.2006 10:19
Сообщение
#7
|
Пионер Группа: Пользователи Сообщений: 92 Пол: Мужской Реальное имя: Stanislav Репутация: 0 |
Да да.. Верно, я сразу это удалила..
Прикольно! Он даже говорит сколько, выиграл Спасибо!!! -------------------- Ben sensiz yaşayamam
|
Текстовая версия | 26.04.2024 14:10 |