Вниз
Скачать: CL | DM;

Программа "Угадай число"   Найти похожие ветки 

← →
Виктория   (2006-10-17 18:24) [0]

Помогите, подайлуста составить код к программе!!! Создается программа по угадыванию числа.Программа случайным образом выбирает числа от 0 до n и запоминает его. Пользователь пытается угадать число, вводя свое число. Сравнивая Вводимое с запомнимым числом программа сообщает >,<,= соответствующему.Ввод продолжается до угадывания, и после угадывания числа программа предлагает сыграть еще раз.


← →
Anth   (2006-10-17 18:28) [1]

http://www.igromania.ru/articles/?71_pandora


← →
Плохиш ©   (2006-10-17 18:30) [2]

1. "Программа случайным образом выбирает числа от 0 до n"
2. и запоминает его."
3. Пользователь вводит число
4. Проверка введённого числа с запомненым
5. Сообщение о результате проверки
6. Если не равно, то к пункту 3
7. Предложение сыграть ещё раз
8. Если пользователь согласился, то к пункту 1
9. Конец

По какому пункту проблемы.

PS. Скоро попросят код программы HelloWorld.


← →
Ketmar ©   (2006-10-17 18:33) [3]

80 WMZ


← →
Jeer ©   (2006-10-17 19:03) [4]

Виктория   (17.10.06 18:24)

Программа в ответ выводит любое случайное число, после чего методами:
- социопсихология;
- гипноз;
- физ.болевое воздействие;
..
etc

убеждает клиента, что это ТО САМОЕ число.

Не поверившие подвергаются селекции.


← →
Palladin ©   (2006-10-17 20:37) [5]


>  [2] Плохиш ©

не переживай :) где в посте вопрос? нету вопроса - то... просто человек радуется задаче и делится с нами своей радостью :)

p.s. обязательно попросят, да еще и скажут: Writeln("Hello world") - не предлагать! неработает!
:)


← →
Loginov Dmitry ©   (2006-10-17 20:53) [6]

Зачем усложнять? Больше... меньше.. равно...

if Edit1.Text <> IntToStr(Random(High(Short))) then
 ShowMessage("Юзер маст дай!");



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
2-1161602191
mefodiy
2006-10-23 15:16
2006.11.05
Access violation при использовании array of array of variant


15-1160952282
AntiUser
2006-10-16 02:44
2006.11.05
Помогите правильно перевести на английский


1-1159164853
Nastina
2006-09-25 10:14
2006.11.05
DblClick по загловку TStringGrid


2-1161084317
Ezorcist
2006-10-17 15:25
2006.11.05
Как решить ошибку несовпадения типов TBitmap и tagBitmap?


15-1161082146
zdm
2006-10-17 14:49
2006.11.05
dll




   Наверх