Люди помогиите курсовая 2 темы... Это надо сделать на Дельфи
1.Разработать программу моделирующую игру кости.Играющий называет любое число в диапозоне от 2 до 12 и ставку,которую он делает в этот ход.Программа с помощью датчика случайных чисел дважды выбирает числа от 1 до 6("бросает кубик",на грянях которого цифры от 1 до 6) Если сумма выпавших цифр меньше 7 и играющий задумал число меньшее 7,он выигрывает сделанную ставку. Если сумма выпавших цифр больше 7 и играющий задумал число большее 7, он так же выигрывает сделанную ставку.Если играющий угадал сумму цифр, он получает в четыре раза больше очков,чем сделанная ставка.Ставка проигранна,если не имеет место ни одна из описанных ситуаций.В начальный момент у играющего 100 очков.В программе должно присутствовать графическое изображение поверхности кубика при каждом ходе игрока.
2.Разработать приложение "Помощник экзаменатора". Экзаменационные вопросы и ответы к ним хранятся в файлах на диске. Каждый вопрос имеет балл сложности. Необходимо подобрать пять вопросов из разных разделов курса, имеющих в сумме балл сложности N, и вывести их на экран. Предусмотреть тренировочный режим работы, когда возможен вывод ответов на представленные вопросы. Доступ к тренировочному режиму работы предоставляется по паролю.
Программеры,если не сложно помогите а...Родина никогда не забудет своих героев :beer::beer:

Добавлено спустя 4 часа, 43 минуты, 29 секунд:
Вот по первому пока что получилось,но эт так наброски
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Buttons, CheckLst;

type
TForm1 = class(TForm)
Panel1: TPanel;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
GroupBox1: TGroupBox;
Button5: TButton;
GroupBox2: TGroupBox;
GroupBox3: TGroupBox;
Label1: TLabel;
Bevel1: TBevel;
Label2: TLabel;
Bevel2: TBevel;
Label3: TLabel;
Label4: TLabel;
Bevel3: TBevel;
Bevel4: TBevel;
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

end.

-=DoberMAN=-
Используй компонент TDice из RXLib, станет гораздо нагляднее.
А какая сложность-то? У тебя алгоритм детально описан.

Так я на 2 курсе учусь всего,поэтому может и слабая...S.Q.Lapp раз делов на 15 минут,так помоги...Люди ну помогите а, паскаль говорите..эх знали бы вы как у нас всё это приподоёться...

Добавлено спустя 7 минут, 16 секунд:
http://www.kursovik.net/programming/103006.html Вот нашёл,вот такая нада, но исходников нету, а сам чёт не догоню

-=DoberMAN=-

ничего сложного в этом нет!
Вот: http://cp.people.overclockers.ru/cgi-bin/dl.pl?id=1496&filename=Test_pas1_1.rar должно помочь.

Добавлено спустя 48 секунд:
Ну, а первый пункт вообще элементарный!!!

Lord_of_Darkness Cпасибо друг!

-=DoberMAN=-
Пожалуйста!
Если что - обращайся, если смогу помогу.

Lord_of_Darkness Нифига она не запускаеться у меня,если не сложно мож поможешь в составлении


Народ,а мож кто ссылки на книги даст,чтоб почитать,чем больше тем лучше

-=DoberMAN=-

Странно! А че говорит-то?
P. S. написана на делфе7

Lord_of_Darkness у меня 6 ,а прога какую то фигню требут

-=DoberMAN=-

Млин, а не XPManifest случаем?? Если его - то просто нажми ignore, а потом поудаляй все упоминания о нем.

Кости сделаны,теперь осталось помошника экзаменатора...помогите