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