找回密码
 注册
广告投放 虚位以待【阿里云】2核2G云新老同享 99元/年,续费同价做网站就用糖果主机-sugarhosts.comJtti.com-新加坡服务器,美国服务器,香港服务器
查看: 476|回复: 4

一个女孩写的经典程序

[复制链接]
发表于 2004 年 10 月 16 日 13:48:22 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

×
  result love(boy, girl) & S2 i1 ^( @! K
    {
. t/ x, U, y0 H7 A% ~) v    if( boy.有房() and boy.有车() )
! _+ @0 m$ w( T; ]    { % C  u' a* ], g2 u, R
    boy.set(nothing); & \9 z5 x1 Y1 o& e& O
     return girl.嫁给(boy); " y  n; k1 e* i6 |0 n/ t
      }
0 n8 |; a* M+ n7 y; ^: z" g    if( girl.愿意等() )
3 E; I2 t' b/ K0 W- ~     {
( V! {) P" n9 l     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) )
; H$ z; u7 B$ c1 g     { ( ]. x5 a0 o6 ]2 x% K, P7 U5 n* G# z
     for( day=1; day <=365; day++) 1 m- G/ ?1 T# i* g
     {
/ W! L! ~8 q' c9 R+ z. V: w     if( day == 情人节 ) 5 m8 I/ j6 Y, P# U6 c
     if( boy.givegirl(玫瑰) ) # K2 ^) ]( `7 f* J4 k, n1 u, ^
     girl.感情++;
7 A! k( L1 G( v8 J% B. Y5 D     else 8 y! R* ?6 v4 P/ V7 i
     girl.感情--; % }. |% B& V. M7 P' D/ Y6 d9 G
  
1 m3 ^8 \$ X" b$ u     if( day == girl.生日) % y: j7 b7 H' D* X6 I/ v# {" \
     if( boy.givegirl(玫瑰) ) 5 X! H7 q: p  N1 T
     girl.感情++; 9 T: Z5 \! u0 c% N
     else . A+ \' b% {2 s, {. ]5 ]
     girl.感情--;
5 A" c( ]/ m1 @' s     boy.拼命赚钱();
* B7 F- D, [1 H+ h( F5 h. i/ M+ t- V     }
" I0 s* h9 [. o- p% z     }   p0 v7 P6 e  L' u1 E
        if( boy.有房() and boy.有车() ) 2 c; H/ ~! g( x/ @6 v  e
        { + s' u8 R8 ^. o% K2 E2 |
     boy.set(nothing);
: |6 Z# B' @0 e- h- v' e     return girl.嫁给(boy); ) \( b1 g5 r4 L- [9 E( t
     }
7 Y1 _# l" r0 e2 Y     年龄++;
4 G) S: G7 L3 j; v& b0 K     girl.感情--; 8 @$ O$ U5 ^4 {( {& i
     } - m4 ?/ |1 }2 v# I  j, e/ _5 m5 m
     return girl.goto( another_boy); : i! N/ ~) ], @9 I; o
     }
6 s- k. M# [0 _0 u  k
  e* D# `/ z  Z8 L5 ]) I4 C# n) K8 N
: \2 C: X( h  M2 r, C* A7 [4 C/ B/ ^# u2 Q5 s- X. P0 K: Y4 {
有网友问:运行后的结果是什么。。。。。。。。。
/ f. y3 q' D5 g( W! z0 }$ `8 H: h; U4 j
0 [7 p7 L* H! i4 u  V7 K

# G+ a! K0 B$ j- N有网友回:变成老处女。。。。。。
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
发表于 2004 年 10 月 16 日 15:36:19 | 显示全部楼层
【腾讯云】2核2G云服务器新老同享 99元/年,续费同价
有网友回:变成老处女。。。。。。
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

发表于 2004 年 10 月 16 日 16:14:01 | 显示全部楼层
老东西 但是不知道 能不能运行
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

发表于 2004 年 10 月 16 日 16:28:13 | 显示全部楼层
下面是引用bbs2006于2004-10-16 3:36 PM发表的 :7 l. i" y) L  y- J/ f
有网友回:变成老处女。。。。。。
错了,有这些她一定会被XX
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

发表于 2004 年 10 月 16 日 16:29:12 | 显示全部楼层
看不懂。。。。。。
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|金光论坛

GMT+8, 2025 年 4 月 29 日 23:21 , Processed in 0.091274 second(s), 22 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表