Hex Artifact Content
Not logged in

Artifact 627b63bf02167db1f6fa165de09c189fac2d128a:


0000: 23 69 6e 63 6c 75 64 65 20 3c 69 6f 73 74 72 65  #include <iostre
0010: 61 6d 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 73  am>..#include <s
0020: 73 74 72 65 61 6d 3e 0d 0a 23 69 6e 63 6c 75 64  stream>..#includ
0030: 65 20 3c 69 6f 6d 61 6e 69 70 3e 0d 0a 23 69 6e  e <iomanip>..#in
0040: 63 6c 75 64 65 20 3c 76 65 63 74 6f 72 3e 0d 0a  clude <vector>..
0050: 23 69 6e 63 6c 75 64 65 20 3c 73 74 72 69 6e 67  #include <string
0060: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 6d 61 70  >..#include <map
0070: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 73 65 74  >..#include <set
0080: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 61 6c 67  >..#include <alg
0090: 6f 72 69 74 68 6d 3e 0d 0a 23 69 6e 63 6c 75 64  orithm>..#includ
00a0: 65 20 3c 6e 75 6d 65 72 69 63 3e 0d 0a 23 69 6e  e <numeric>..#in
00b0: 63 6c 75 64 65 20 3c 69 74 65 72 61 74 6f 72 3e  clude <iterator>
00c0: 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 66 75 6e 63  ..#include <func
00d0: 74 69 6f 6e 61 6c 3e 0d 0a 23 69 6e 63 6c 75 64  tional>..#includ
00e0: 65 20 3c 63 6f 6d 70 6c 65 78 3e 0d 0a 23 69 6e  e <complex>..#in
00f0: 63 6c 75 64 65 20 3c 71 75 65 75 65 3e 0d 0a 23  clude <queue>..#
0100: 69 6e 63 6c 75 64 65 20 3c 73 74 61 63 6b 3e 0d  include <stack>.
0110: 0a 23 69 6e 63 6c 75 64 65 20 3c 63 6d 61 74 68  .#include <cmath
0120: 3e 0d 0a 23 69 6e 63 6c 75 64 65 20 3c 63 61 73  >..#include <cas
0130: 73 65 72 74 3e 0d 0a 23 69 6e 63 6c 75 64 65 20  sert>..#include 
0140: 3c 63 73 74 72 69 6e 67 3e 0d 0a 75 73 69 6e 67  <cstring>..using
0150: 20 6e 61 6d 65 73 70 61 63 65 20 73 74 64 3b 0d   namespace std;.
0160: 0a 74 79 70 65 64 65 66 20 6c 6f 6e 67 20 6c 6f  .typedef long lo
0170: 6e 67 20 4c 4c 3b 0d 0a 74 79 70 65 64 65 66 20  ng LL;..typedef 
0180: 63 6f 6d 70 6c 65 78 3c 64 6f 75 62 6c 65 3e 20  complex<double> 
0190: 43 4d 50 3b 0d 0a 0d 0a 63 6c 61 73 73 20 4c 61  CMP;....class La
01a0: 73 74 4d 61 72 62 6c 65 20 7b 20 70 75 62 6c 69  stMarble { publi
01b0: 63 3a 0d 0a 09 74 79 70 65 64 65 66 20 70 61 69  c:...typedef pai
01c0: 72 3c 69 6e 74 2c 69 6e 74 3e 20 20 72 62 3b 0d  r<int,int>  rb;.
01d0: 0a 09 74 79 70 65 64 65 66 20 6d 61 70 3c 72 62  ..typedef map<rb
01e0: 2c 64 6f 75 62 6c 65 3e 20 73 74 61 74 65 3b 0d  ,double> state;.
01f0: 0a 0d 0a 09 64 6f 75 62 6c 65 20 77 69 6e 6e 69  ....double winni
0200: 6e 67 43 68 61 6e 63 65 28 69 6e 74 20 72 65 64  ngChance(int red
0210: 2c 20 69 6e 74 20 62 6c 75 65 2c 20 69 6e 74 20  , int blue, int 
0220: 72 65 6d 6f 76 65 64 29 20 0d 0a 09 7b 0d 0a 09  removed) ...{...
0230: 09 73 74 61 74 65 20 73 3b 0d 0a 09 09 61 64 64  .state s;....add
0240: 4e 65 78 74 53 74 61 74 65 73 28 20 72 65 64 2c  NextStates( red,
0250: 20 62 6c 75 65 2c 20 31 2e 30 2c 20 72 65 6d 6f   blue, 1.0, remo
0260: 76 65 64 2c 20 73 20 29 3b 0d 0a 09 09 72 65 74  ved, s );....ret
0270: 75 72 6e 20 77 69 6e 43 68 61 6e 63 65 28 73 29  urn winChance(s)
0280: 3b 0d 0a 09 7d 0d 0a 0d 0a 09 64 6f 75 62 6c 65  ;...}.....double
0290: 20 77 69 6e 43 68 61 6e 63 65 28 20 73 74 61 74   winChance( stat
02a0: 65 26 20 73 20 29 0d 0a 09 7b 0d 0a 09 09 69 66  e& s )...{....if
02b0: 28 20 73 2e 65 6d 70 74 79 28 29 20 29 0d 0a 09  ( s.empty() )...
02c0: 09 09 72 65 74 75 72 6e 20 31 2e 30 3b 20 2f 2f  ..return 1.0; //
02d0: 20 61 6e 79 20 76 61 6c 75 65 20 69 73 20 6f 6b   any value is ok
02e0: 20 62 65 63 61 75 73 65 20 69 74 20 77 69 6c 6c   because it will
02f0: 20 62 65 20 6d 75 6c 74 69 70 6c 69 65 64 20 62   be multiplied b
0300: 79 20 30 2e 30 0d 0a 0d 0a 09 09 69 6e 74 20 72  y 0.0......int r
0310: 5f 70 6c 75 73 5f 62 20 3d 20 73 2e 62 65 67 69  _plus_b = s.begi
0320: 6e 28 29 2d 3e 66 69 72 73 74 2e 66 69 72 73 74  n()->first.first
0330: 20 2b 20 73 2e 62 65 67 69 6e 28 29 2d 3e 66 69   + s.begin()->fi
0340: 72 73 74 2e 73 65 63 6f 6e 64 3b 0d 0a 0d 0a 09  rst.second;.....
0350: 09 64 6f 75 62 6c 65 20 6c 63 20 3d 20 31 2e 30  .double lc = 1.0
0360: 3b 0d 0a 09 09 66 6f 72 28 69 6e 74 20 74 61 6b  ;....for(int tak
0370: 65 3d 31 3b 20 74 61 6b 65 3c 3d 6d 69 6e 28 33  e=1; take<=min(3
0380: 2c 72 5f 70 6c 75 73 5f 62 29 3b 20 2b 2b 74 61  ,r_plus_b); ++ta
0390: 6b 65 29 0d 0a 09 09 7b 0d 0a 09 09 09 73 74 61  ke)....{.....sta
03a0: 74 65 20 6e 73 3b 0d 0a 09 09 09 66 6f 72 28 73  te ns;.....for(s
03b0: 74 61 74 65 3a 3a 69 74 65 72 61 74 6f 72 20 69  tate::iterator i
03c0: 74 3d 73 2e 62 65 67 69 6e 28 29 3b 20 69 74 21  t=s.begin(); it!
03d0: 3d 73 2e 65 6e 64 28 29 3b 20 2b 2b 69 74 29 0d  =s.end(); ++it).
03e0: 0a 09 09 09 09 61 64 64 4e 65 78 74 53 74 61 74  .....addNextStat
03f0: 65 73 28 69 74 2d 3e 66 69 72 73 74 2e 66 69 72  es(it->first.fir
0400: 73 74 2c 20 69 74 2d 3e 66 69 72 73 74 2e 73 65  st, it->first.se
0410: 63 6f 6e 64 2c 20 69 74 2d 3e 73 65 63 6f 6e 64  cond, it->second
0420: 2c 20 74 61 6b 65 2c 20 6e 73 29 3b 0d 0a 0d 0a  , take, ns);....
0430: 09 09 09 64 6f 75 62 6c 65 20 6e 6f 77 4c 6f 73  ...double nowLos
0440: 65 43 68 61 6e 63 65 20 3d 20 30 2e 30 3b 0d 0a  eChance = 0.0;..
0450: 09 09 09 66 6f 72 28 73 74 61 74 65 3a 3a 69 74  ...for(state::it
0460: 65 72 61 74 6f 72 20 69 74 3d 6e 73 2e 62 65 67  erator it=ns.beg
0470: 69 6e 28 29 3b 20 69 74 21 3d 6e 73 2e 65 6e 64  in(); it!=ns.end
0480: 28 29 3b 20 29 0d 0a 09 09 09 09 69 66 28 20 69  (); )......if( i
0490: 74 2d 3e 66 69 72 73 74 2e 66 69 72 73 74 20 3d  t->first.first =
04a0: 3d 20 30 20 29 20 7b 0d 0a 09 09 09 09 09 6e 6f  = 0 ) {.......no
04b0: 77 4c 6f 73 65 43 68 61 6e 63 65 20 2b 3d 20 69  wLoseChance += i
04c0: 74 2d 3e 73 65 63 6f 6e 64 3b 0d 0a 09 09 09 09  t->second;......
04d0: 09 6e 73 2e 65 72 61 73 65 28 20 69 74 2b 2b 20  .ns.erase( it++ 
04e0: 29 3b 0d 0a 09 09 09 09 7d 20 65 6c 73 65 20 7b  );......} else {
04f0: 0d 0a 09 09 09 09 09 2b 2b 69 74 3b 0d 0a 09 09  .......++it;....
0500: 09 09 7d 0d 0a 09 0d 0a 09 09 09 64 6f 75 62 6c  ..}........doubl
0510: 65 20 63 6f 6e 74 69 6e 75 65 43 68 61 6e 63 65  e continueChance
0520: 20 3d 20 31 2e 30 20 2d 20 6e 6f 77 4c 6f 73 65   = 1.0 - nowLose
0530: 43 68 61 6e 63 65 3b 0d 0a 09 09 09 66 6f 72 28  Chance;.....for(
0540: 73 74 61 74 65 3a 3a 69 74 65 72 61 74 6f 72 20  state::iterator 
0550: 69 74 3d 6e 73 2e 62 65 67 69 6e 28 29 3b 20 69  it=ns.begin(); i
0560: 74 21 3d 6e 73 2e 65 6e 64 28 29 3b 20 2b 2b 69  t!=ns.end(); ++i
0570: 74 29 0d 0a 09 09 09 09 69 74 2d 3e 73 65 63 6f  t)......it->seco
0580: 6e 64 20 2f 3d 20 63 6f 6e 74 69 6e 75 65 43 68  nd /= continueCh
0590: 61 6e 63 65 3b 0d 0a 09 09 09 64 6f 75 62 6c 65  ance;.....double
05a0: 20 6c 6f 73 65 43 68 61 6e 63 65 20 3d 20 6e 6f   loseChance = no
05b0: 77 4c 6f 73 65 43 68 61 6e 63 65 20 2b 20 77 69  wLoseChance + wi
05c0: 6e 43 68 61 6e 63 65 28 6e 73 29 2a 63 6f 6e 74  nChance(ns)*cont
05d0: 69 6e 75 65 43 68 61 6e 63 65 3b 0d 0a 09 09 09  inueChance;.....
05e0: 6c 63 20 3d 20 6d 69 6e 28 6c 63 2c 20 6c 6f 73  lc = min(lc, los
05f0: 65 43 68 61 6e 63 65 29 3b 0d 0a 09 09 7d 0d 0a  eChance);....}..
0600: 09 09 72 65 74 75 72 6e 20 31 2e 30 20 2d 20 6c  ..return 1.0 - l
0610: 63 3b 0d 0a 09 7d 0d 0a 0d 0a 09 76 6f 69 64 20  c;...}.....void 
0620: 61 64 64 4e 65 78 74 53 74 61 74 65 73 28 69 6e  addNextStates(in
0630: 74 20 72 2c 20 69 6e 74 20 62 2c 20 64 6f 75 62  t r, int b, doub
0640: 6c 65 20 70 2c 20 69 6e 74 20 74 61 6b 65 2c 20  le p, int take, 
0650: 73 74 61 74 65 26 20 6d 29 0d 0a 09 7b 0d 0a 09  state& m)...{...
0660: 09 69 66 28 20 74 61 6b 65 20 3d 3d 20 30 20 29  .if( take == 0 )
0670: 20 7b 0d 0a 09 09 09 6d 5b 72 62 28 72 2c 62 29   {.....m[rb(r,b)
0680: 5d 20 2b 3d 20 70 3b 0d 0a 09 09 09 72 65 74 75  ] += p;.....retu
0690: 72 6e 3b 0d 0a 09 09 7d 0d 0a 0d 0a 09 09 73 74  rn;....}......st
06a0: 61 74 65 20 74 6d 70 3b 0d 0a 09 09 74 6d 70 5b  ate tmp;....tmp[
06b0: 72 62 28 72 2c 62 29 5d 20 3d 20 70 3b 0d 0a 0d  rb(r,b)] = p;...
06c0: 0a 09 09 77 68 69 6c 65 28 20 74 61 6b 65 20 2d  ...while( take -
06d0: 2d 3e 20 30 20 29 0d 0a 09 09 7b 0d 0a 09 09 09  -> 0 )....{.....
06e0: 73 74 61 74 65 20 74 6d 70 32 3b 0d 0a 09 09 09  state tmp2;.....
06f0: 73 74 61 74 65 26 20 74 67 74 20 3d 20 28 74 61  state& tgt = (ta
0700: 6b 65 20 3f 20 74 6d 70 32 20 3a 20 6d 29 3b 0d  ke ? tmp2 : m);.
0710: 0a 09 09 09 66 6f 72 28 73 74 61 74 65 3a 3a 69  ....for(state::i
0720: 74 65 72 61 74 6f 72 20 69 74 3d 74 6d 70 2e 62  terator it=tmp.b
0730: 65 67 69 6e 28 29 3b 20 69 74 21 3d 74 6d 70 2e  egin(); it!=tmp.
0740: 65 6e 64 28 29 3b 20 2b 2b 69 74 29 0d 0a 09 09  end(); ++it)....
0750: 09 7b 0d 0a 09 09 09 09 69 6e 74 20 72 20 3d 20  .{......int r = 
0760: 69 74 2d 3e 66 69 72 73 74 2e 66 69 72 73 74 3b  it->first.first;
0770: 0d 0a 09 09 09 09 69 6e 74 20 62 20 3d 20 69 74  ......int b = it
0780: 2d 3e 66 69 72 73 74 2e 73 65 63 6f 6e 64 3b 0d  ->first.second;.
0790: 0a 09 09 09 09 64 6f 75 62 6c 65 20 70 20 3d 20  .....double p = 
07a0: 69 74 2d 3e 73 65 63 6f 6e 64 3b 0d 0a 09 09 09  it->second;.....
07b0: 09 69 66 28 20 72 3e 30 20 29 20 74 67 74 5b 72  .if( r>0 ) tgt[r
07c0: 62 28 72 2d 31 2c 62 29 5d 20 2b 3d 20 70 20 2a  b(r-1,b)] += p *
07d0: 20 72 20 2f 20 28 72 2b 62 29 3b 0d 0a 09 09 09   r / (r+b);.....
07e0: 09 69 66 28 20 62 3e 30 20 29 20 74 67 74 5b 72  .if( b>0 ) tgt[r
07f0: 62 28 72 2c 62 2d 31 29 5d 20 2b 3d 20 70 20 2a  b(r,b-1)] += p *
0800: 20 62 20 2f 20 28 72 2b 62 29 3b 0d 0a 09 09 09   b / (r+b);.....
0810: 7d 0d 0a 09 09 09 74 6d 70 2e 73 77 61 70 28 74  }.....tmp.swap(t
0820: 6d 70 32 29 3b 0d 0a 09 09 7d 0d 0a 09 7d 0d 0a  mp2);....}...}..
0830: 7d 3b 0d 0a 0d 0a 2f 2f 20 42 45 47 49 4e 20 43  };....// BEGIN C
0840: 55 54 20 48 45 52 45 0d 0a 23 69 6e 63 6c 75 64  UT HERE..#includ
0850: 65 20 3c 63 74 69 6d 65 3e 0d 0a 64 6f 75 62 6c  e <ctime>..doubl
0860: 65 20 73 74 61 72 74 5f 74 69 6d 65 3b 20 73 74  e start_time; st
0870: 72 69 6e 67 20 74 69 6d 65 72 28 29 0d 0a 20 7b  ring timer().. {
0880: 20 6f 73 74 72 69 6e 67 73 74 72 65 61 6d 20 6f   ostringstream o
0890: 73 3b 20 6f 73 20 3c 3c 20 22 20 28 22 20 3c 3c  s; os << " (" <<
08a0: 20 69 6e 74 28 28 63 6c 6f 63 6b 28 29 2d 73 74   int((clock()-st
08b0: 61 72 74 5f 74 69 6d 65 29 2f 43 4c 4f 43 4b 53  art_time)/CLOCKS
08c0: 5f 50 45 52 5f 53 45 43 2a 31 30 30 30 29 20 3c  _PER_SEC*1000) <
08d0: 3c 20 22 20 6d 73 65 63 29 22 3b 20 72 65 74 75  < " msec)"; retu
08e0: 72 6e 20 6f 73 2e 73 74 72 28 29 3b 20 7d 0d 0a  rn os.str(); }..
08f0: 74 65 6d 70 6c 61 74 65 3c 74 79 70 65 6e 61 6d  template<typenam
0900: 65 20 54 3e 20 6f 73 74 72 65 61 6d 26 20 6f 70  e T> ostream& op
0910: 65 72 61 74 6f 72 3c 3c 28 6f 73 74 72 65 61 6d  erator<<(ostream
0920: 26 20 6f 73 2c 20 63 6f 6e 73 74 20 76 65 63 74  & os, const vect
0930: 6f 72 3c 54 3e 26 20 76 29 0d 0a 20 7b 20 6f 73  or<T>& v).. { os
0940: 20 3c 3c 20 22 7b 20 22 3b 0d 0a 20 20 20 66 6f   << "{ ";..   fo
0950: 72 28 74 79 70 65 6e 61 6d 65 20 76 65 63 74 6f  r(typename vecto
0960: 72 3c 54 3e 3a 3a 63 6f 6e 73 74 5f 69 74 65 72  r<T>::const_iter
0970: 61 74 6f 72 20 69 74 3d 76 2e 62 65 67 69 6e 28  ator it=v.begin(
0980: 29 3b 20 69 74 21 3d 76 2e 65 6e 64 28 29 3b 20  ); it!=v.end(); 
0990: 2b 2b 69 74 29 0d 0a 20 20 20 6f 73 20 3c 3c 20  ++it)..   os << 
09a0: 27 5c 22 27 20 3c 3c 20 2a 69 74 20 3c 3c 20 27  '\"' << *it << '
09b0: 5c 22 27 20 3c 3c 20 28 69 74 2b 31 3d 3d 76 2e  \"' << (it+1==v.
09c0: 65 6e 64 28 29 20 3f 20 22 22 20 3a 20 22 2c 20  end() ? "" : ", 
09d0: 22 29 3b 20 6f 73 20 3c 3c 20 22 20 7d 22 3b 20  "); os << " }"; 
09e0: 72 65 74 75 72 6e 20 6f 73 3b 20 7d 0d 0a 76 6f  return os; }..vo
09f0: 69 64 20 76 65 72 69 66 79 5f 63 61 73 65 28 63  id verify_case(c
0a00: 6f 6e 73 74 20 64 6f 75 62 6c 65 26 20 45 78 70  onst double& Exp
0a10: 65 63 74 65 64 2c 20 63 6f 6e 73 74 20 64 6f 75  ected, const dou
0a20: 62 6c 65 26 20 52 65 63 65 69 76 65 64 29 20 7b  ble& Received) {
0a30: 0d 0a 20 64 6f 75 62 6c 65 20 64 69 66 66 20 3d  .. double diff =
0a40: 20 45 78 70 65 63 74 65 64 20 2d 20 52 65 63 65   Expected - Rece
0a50: 69 76 65 64 3b 20 69 66 20 28 64 69 66 66 20 3c  ived; if (diff <
0a60: 20 30 29 20 64 69 66 66 20 3d 20 2d 64 69 66 66   0) diff = -diff
0a70: 3b 20 62 6f 6f 6c 20 6f 6b 20 3d 20 28 64 69 66  ; bool ok = (dif
0a80: 66 20 3c 20 31 65 2d 39 29 3b 0d 0a 20 69 66 28  f < 1e-9);.. if(
0a90: 6f 6b 29 20 63 65 72 72 20 3c 3c 20 22 50 41 53  ok) cerr << "PAS
0aa0: 53 45 44 22 20 3c 3c 20 74 69 6d 65 72 28 29 20  SED" << timer() 
0ab0: 3c 3c 20 65 6e 64 6c 3b 20 20 65 6c 73 65 20 7b  << endl;  else {
0ac0: 20 63 65 72 72 20 3c 3c 20 22 46 41 49 4c 45 44   cerr << "FAILED
0ad0: 22 20 3c 3c 20 74 69 6d 65 72 28 29 20 3c 3c 20  " << timer() << 
0ae0: 65 6e 64 6c 3b 0d 0a 20 63 65 72 72 20 3c 3c 20  endl;.. cerr << 
0af0: 22 5c 74 6f 3a 20 5c 22 22 20 3c 3c 20 45 78 70  "\to: \"" << Exp
0b00: 65 63 74 65 64 20 3c 3c 20 27 5c 22 27 20 3c 3c  ected << '\"' <<
0b10: 20 65 6e 64 6c 20 3c 3c 20 22 5c 74 78 3a 20 5c   endl << "\tx: \
0b20: 22 22 20 3c 3c 20 52 65 63 65 69 76 65 64 20 3c  "" << Received <
0b30: 3c 20 27 5c 22 27 20 3c 3c 20 65 6e 64 6c 3b 20  < '\"' << endl; 
0b40: 7d 20 7d 0d 0a 23 64 65 66 69 6e 65 20 43 41 53  } }..#define CAS
0b50: 45 28 4e 29 20 7b 63 65 72 72 20 3c 3c 20 22 54  E(N) {cerr << "T
0b60: 65 73 74 20 43 61 73 65 20 23 22 20 3c 3c 20 4e  est Case #" << N
0b70: 20 3c 3c 20 22 2e 2e 2e 22 20 3c 3c 20 66 6c 75   << "..." << flu
0b80: 73 68 3b 20 73 74 61 72 74 5f 74 69 6d 65 3d 63  sh; start_time=c
0b90: 6c 6f 63 6b 28 29 3b 0d 0a 23 64 65 66 69 6e 65  lock();..#define
0ba0: 20 45 4e 44 09 20 76 65 72 69 66 79 5f 63 61 73   END. verify_cas
0bb0: 65 28 5f 2c 20 4c 61 73 74 4d 61 72 62 6c 65 28  e(_, LastMarble(
0bc0: 29 2e 77 69 6e 6e 69 6e 67 43 68 61 6e 63 65 28  ).winningChance(
0bd0: 72 65 64 2c 20 62 6c 75 65 2c 20 72 65 6d 6f 76  red, blue, remov
0be0: 65 64 29 29 3b 7d 0d 0a 69 6e 74 20 6d 61 69 6e  ed));}..int main
0bf0: 28 29 7b 0d 0a 0d 0a 43 41 53 45 28 30 29 0d 0a  (){....CASE(0)..
0c00: 09 69 6e 74 20 72 65 64 20 3d 20 31 3b 20 0d 0a  .int red = 1; ..
0c10: 09 69 6e 74 20 62 6c 75 65 20 3d 20 31 3b 20 0d  .int blue = 1; .
0c20: 0a 09 69 6e 74 20 72 65 6d 6f 76 65 64 20 3d 20  ..int removed = 
0c30: 30 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f 20 3d  0; ...double _ =
0c40: 20 30 2e 35 3b 20 0d 0a 45 4e 44 0d 0a 43 41 53   0.5; ..END..CAS
0c50: 45 28 31 29 0d 0a 09 69 6e 74 20 72 65 64 20 3d  E(1)...int red =
0c60: 20 31 3b 20 0d 0a 09 69 6e 74 20 62 6c 75 65 20   1; ...int blue 
0c70: 3d 20 32 3b 20 0d 0a 09 69 6e 74 20 72 65 6d 6f  = 2; ...int remo
0c80: 76 65 64 20 3d 20 30 3b 20 0d 0a 09 64 6f 75 62  ved = 0; ...doub
0c90: 6c 65 20 5f 20 3d 20 30 2e 33 33 33 33 33 33 33  le _ = 0.3333333
0ca0: 33 33 33 33 33 33 33 33 33 3b 20 0d 0a 45 4e 44  333333333; ..END
0cb0: 0d 0a 43 41 53 45 28 32 29 0d 0a 09 69 6e 74 20  ..CASE(2)...int 
0cc0: 72 65 64 20 3d 20 32 3b 20 0d 0a 09 69 6e 74 20  red = 2; ...int 
0cd0: 62 6c 75 65 20 3d 20 31 3b 20 0d 0a 09 69 6e 74  blue = 1; ...int
0ce0: 20 72 65 6d 6f 76 65 64 20 3d 20 30 3b 20 0d 0a   removed = 0; ..
0cf0: 09 64 6f 75 62 6c 65 20 5f 20 3d 20 30 2e 36 36  .double _ = 0.66
0d00: 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3b 20  66666666666666; 
0d10: 0d 0a 45 4e 44 0d 0a 43 41 53 45 28 33 29 0d 0a  ..END..CASE(3)..
0d20: 09 69 6e 74 20 72 65 64 20 3d 20 32 3b 20 0d 0a  .int red = 2; ..
0d30: 09 69 6e 74 20 62 6c 75 65 20 3d 20 32 3b 20 0d  .int blue = 2; .
0d40: 0a 09 69 6e 74 20 72 65 6d 6f 76 65 64 20 3d 20  ..int removed = 
0d50: 31 3b 20 0d 0a 09 64 6f 75 62 6c 65 20 5f 20 3d  1; ...double _ =
0d60: 20 30 2e 35 3b 20 0d 0a 45 4e 44 0d 0a 2f 2a 0d   0.5; ..END../*.
0d70: 0a 43 41 53 45 28 34 29 0d 0a 09 69 6e 74 20 72  .CASE(4)...int r
0d80: 65 64 20 3d 20 3b 20 0d 0a 09 69 6e 74 20 62 6c  ed = ; ...int bl
0d90: 75 65 20 3d 20 3b 20 0d 0a 09 69 6e 74 20 72 65  ue = ; ...int re
0da0: 6d 6f 76 65 64 20 3d 20 3b 20 0d 0a 09 64 6f 75  moved = ; ...dou
0db0: 62 6c 65 20 5f 20 3d 20 3b 20 0d 0a 45 4e 44 0d  ble _ = ; ..END.
0dc0: 0a 43 41 53 45 28 35 29 0d 0a 09 69 6e 74 20 72  .CASE(5)...int r
0dd0: 65 64 20 3d 20 3b 20 0d 0a 09 69 6e 74 20 62 6c  ed = ; ...int bl
0de0: 75 65 20 3d 20 3b 20 0d 0a 09 69 6e 74 20 72 65  ue = ; ...int re
0df0: 6d 6f 76 65 64 20 3d 20 3b 20 0d 0a 09 64 6f 75  moved = ; ...dou
0e00: 62 6c 65 20 5f 20 3d 20 3b 20 0d 0a 45 4e 44 0d  ble _ = ; ..END.
0e10: 0a 2a 2f 0d 0a 7d 0d 0a 2f 2f 20 45 4e 44 20 43  .*/..}..// END C
0e20: 55 54 20 48 45 52 45 0d 0a                       UT HERE..