77720.fb2 Bash.org.ru IT Happens Истории ## 1601 - 1700 - читать онлайн бесплатно полную версию книги . Страница 96

Bash.org.ru IT Happens Истории ## 1601 - 1700 - читать онлайн бесплатно полную версию книги . Страница 96

#1695: Потеснитесь

14:00 16.12.2009, IT happens

 

Когда я учился я в техникуме, знакомый на лекции попросил меня написать ему на бейсике какую нибудь игрушку на его БК. Отчего ж не написать? Взял я тетрадь в клеточку и заполнил кодом «крестиков-ноликов» несколько страниц (много кода ушло на графическое оформление). Так как знакомый не обладал высокой скоростью печати, набирал он игру по вечерам в течение недели с промежуточным сохранением на кассету.

 

И вот игра запущена: комп делает свой первый ход крестом. На пятый ход знакомый начинает ликовать: все возможные ходы компьютера ведут к проигрышу. Компьютер, не отчаиваясь, ставит крест на его нолике, зачёркивает свою линию и рапортует о победе.