Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.11.05;
Скачать: [xml.tar.bz2];

Вниз

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

 
Виктория   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.051 c
15-1161276639
*Стажер*
2006-10-19 20:50
2006.11.05
UPX


2-1161678823
Crazybeaver
2006-10-24 12:33
2006.11.05
Popupmenu над кнопкой


15-1161194808
yura32
2006-10-18 22:06
2006.11.05
SQL+PHP


15-1160643476
xayam
2006-10-12 12:57
2006.11.05
Что дальше или в чем ВАШ смысл жизни?


3-1157981923
zorik
2006-09-11 17:38
2006.11.05
Как составить запрос который бы возвратил три записи:





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский