Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Написание игр _ Простая рулетка

Автор: KostyaPas 8.07.2016 17:44

Код для простой текстовой рулетки :
Если не сложно прокомментируйте smile.gif


Uses crt;
var
c,a,s,ch,v,d: longint;
begin
d:=0;
c:=1000;
repeat
writeln('Coin: ',c);
writeln('Ваша ставка: ');
read(s);//Используй только цифры
if s <= c then
begin
writeln('Ваше число(1-5): ');
read(ch);
if (ch<=5) and (ch>=1) then // только числа от 1 до 5
begin
randomize;
a:=random(5)+1;
if ch=a then
begin
writeln('Win!!');
v:=s*10; // сумма выигрыша умножается на 10
c:=c+v;
end
else
writeln('Lose');
c:=c-s;
end;
end;
clrscr;
until d=1;
end.





Прикрепленные файлы
Прикрепленный файл  ruletka.pas ( 768 байт ) Кол-во скачиваний: 497

Автор: pognn 6.10.2022 15:18

Мне больше нравится играть в онлайн казино. Я зарабатываю в https://vkrolika.ru/ казино и мне очень нравится софт площадки. Для меня Turbo Casino в первую очередь это средство развлечения, а после заработка.

Автор: dikowa6629 6.10.2022 20:57

А я всегда прежде чем играть в рулетку захожу на сайт где есть https://topkazinoonline.com/ там выбираю себе рейтинговое онлайн казино 2022 года, и играю на реальные деньги в рулетку. Всегда пользуюсь сайтом, где можно посмотреть рейтинг онлайн казино в 2022 году, чтобы полноценно поиграть и на этом заработать.

Автор: dasoxa 24.10.2022 23:21

А мне нравится простая рулетка в казино Селектор. Тут на сайте https://selector.gg/ очень доступно поясняют весь математический цикл игры в слоты и рулетку. Играйте и считайте быстро!

Автор: qzqyyf 9.11.2022 16:17

Доброго дня, хотел бы порекомендовать онлайн казино https://sozdamblog.ru/ Vavada. Казино предлагает пользователям приветственный бонус. Регистрируйтесь и выигрывайте!