Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.05;
Скачать: 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 вся ветка

Текущий архив: 2006.11.05;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.042 c
15-1161132171
Гугол
2006-10-18 04:42
2006.11.05
Би Три Квадра Квинта Секста Септима Окта продолжите ряд?


1-1159275874
flaxe
2006-09-26 17:04
2006.11.05
"Перетаскивание" изображений


15-1160621748
Slider007
2006-10-12 06:55
2006.11.05
С днем рождения ! 12 октября


15-1161169749
Сергей М.
2006-10-18 15:09
2006.11.05
Эмуляция HL EYE


15-1161264635
Firefly
2006-10-19 17:30
2006.11.05
Apache и PHP на HP-UX





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский