Блэк Джек на Pascal
 

Привет!Поможете с написанием программки?!) Игра "Черный Джек" ("Очко") заключается в том, что:
а) каждой карте соответствует определенное число:
шестерка - 6 девятка - 9 дама - 3
семерка - 7 десятка - 10 король - 4
восьмерка - 8 валет - 2 туз - 11
б) участники игры получают из колоды карты по одной и считают полученные баллы. В зависимости от суммы игрок может сказать, что ему хватит или попросить еще одну карту. Выигрывает тот из игроков, сумма баллов которого ближе к 21. Тот, кто набрал больше двадцати одного ("перебор") проиграл.Нужно составить программу, которая позволяет человеку играть в эту игру вдвоем с компьютерм (ведь для этого карты вовсе не обязательны, так как можно получать с помощью функции Random случайные числа от 2-11 ) Заранее спасибо,,,)

Не все так просто, как вам кажется. По правилам, карты во время сдачи не тусуются, то есть нужно сначала рандомно расположить в массиве по 4 карты каждого номинала, потом приступать к раздаче. Также нужно предусмотреть возможность аварийного выхода из активной игры и рестарта с возвратом к тусованию колоды, а при многократном (более 2-х раз) рестарте должен быть выход с награждением игрока каким-либо неприятным титулом, вроде хлюзди или мошенника :)). Ну и начальный бонус в виде очков и способ зарабатывания начального капиталла путем, к примеру, победы в викторине, тоже добавит азарта к игре.

Спасибо!Может сможете предложить свой вариант написания программы?!)

К сожалению, пока ничем вас обрадовать не могу, дел по горло. Там ведь ещё и какой-никакой графический интерфейс придумать и реализовать надо будет.

А если попроще,в рамках школьной программы?!Извините,что обременяю,,,

Без интерфейса,,,)