Камень, ножницы, бумага: различия между версиями

>Профессор абсурдологии
>Профессор абсурдологии
Строка 86: Строка 86:


== Компьютерная программа для игры в КНБ ==
== Компьютерная программа для игры в КНБ ==
В 1993 году '''международная ассоциация по игре в КНБ''' (МАИКНБ) пообещала 60 [[миллиард|млрд]] [[доллар]]ов тому, кто создаст программу, которая бы выигрывала всех без исключения, рассчитывая заработать на этом куда бо́льшие деньги. Среди программистов всего [[Земля|земного шара]] было предпринято немало попыток стать мультимиллиардером, но лишь [[Билл Гейтс|Биллу Гейтсу]] удалось создать такую программу, в результате чего он стал самым богатым человеком в мире. Профессиональные игроки в КНБ съезжались со всего мира в штаб-квартиру компании [[Microsoft]], чтобы за 2000 долларов сыграть с [[компьютер]]ом, тщетно надеясь на победу и приз в 1 млн [[у. е.]], а МАИКНБ обогащалась за их счёт.
В 1993 году '''международная ассоциация по игре в КНБ''' (МАИКНБ) пообещала 60 [[миллиард|млрд]] [[доллар]]ов тому, кто создаст программу, которая бы выигрывала всех без исключения, рассчитывая заработать на этом куда бо́льшие деньги. Среди программистов всего [[Земля|земного шара]] было предпринято немало попыток стать мультимиллиардером, но лишь [[Билл Гейтс|Биллу Гейтсу]] удалось создать такую программу, в результате чего он стал самым богатым человеком в мире. Профессиональные игроки в КНБ съезжались со всего мира в штаб-квартиру компании [[Microsoft]], чтобы за 2000 долларов сыграть с [[компьютер]]ом, тщетно надеясь на победу и приз в 1 млн [[у. е.|у. е.]], а МАИКНБ обогащалась за их счёт.


Так продолжалось до 2005 года, пока с компьютером не сыграл господин [[евреи|Рабинович. Е. В.]], которому удалось одержать победу. С тех пор стали всё чаще выигрывать не только профессиональные игроки в КНБ, но и обычные люди. В конце концов, МАИКНБ обанкротилась и подала на Гейтса в Международный уголовный суд.  
Так продолжалось до 2005 года, пока с компьютером не сыграл господин [[евреи|Рабинович. Е. В.]], которому удалось одержать победу. С тех пор стали всё чаще выигрывать не только профессиональные игроки в КНБ, но и обычные люди. В конце концов, МАИКНБ обанкротилась и подала на Гейтса в Международный уголовный суд.  
Строка 105: Строка 105:
  writeln('Try to win, loser! Bad luck!');
  writeln('Try to win, loser! Bad luck!');
  read(user-loser);
  read(user-loser);
   repeat  
   repeat    
  write(' - ');
   case user-loser of
   case user-loser of
   Rock: PC:=Paper;
   Rock: PC:=Paper;
Строка 123: Строка 122:
     end;
     end;
   end;
   end;
   writeln(PC);
   writeln(' - ',PC);
   if money_for_Billy=false then read(user-loser);
   if money_for_Billy=false then read(user-loser);
   until (user-loser=Enough!_I_give_up!) or (money_for_Billy=true);
   until (user-loser=Enough!_I_give_up!) or (money_for_Billy=true);