找回密码
 注册
房产快测算-Fckcs.Cn华为云精选云产品特惠【阿里云】2核2G云新老同享 99元/年,续费同价新注册的朋友如何升级转正
查看: 622|回复: 4

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl) 2 w% w# T: I2 m3 T
    { & j. `' c' A7 ?  j  Y8 v
    if( boy.有房() and boy.有车() ) + D/ G' L( X% L8 W# r
    { 9 P# H+ H  P: K4 D
    boy.set(nothing); + D& L6 V  y: k4 F& N7 ^" I
     return girl.嫁给(boy);
- w/ x- T) X  A( b3 A( ]/ y      }
) V0 W# d" P' z, J( i  v    if( girl.愿意等() ) . q4 ^1 ?. d' `8 T3 @
     { 5 N% K0 P! d: v) t3 C# d
     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) ' n* J, ^. ]) m8 @0 q
     {
  N7 s7 ]2 u  ]9 [" R, u     for( day=1; day <=365; day++)
3 Y9 h/ N/ r( G; m     {
3 e; P. R0 d: _4 g3 g     if( day == 情人节 )
/ Q4 v" b/ l/ T+ n: o     if( boy.givegirl(玫瑰) ) # F0 d  z+ F' |" o# N" l, |
     girl.感情++; " Q/ F6 {3 ]1 f
     else
1 b. ?; o1 c7 J4 _* l4 }  x$ L$ R, O+ `     girl.感情--; 8 ?7 @. W# q/ Y5 k; V$ t
   8 t& H6 v$ S$ Z1 E
     if( day == girl.生日) - R; X7 t+ B; p. B0 o9 O0 _
     if( boy.givegirl(玫瑰) ) : P# n3 _: G& y3 J/ E+ F) A3 f
     girl.感情++;
2 S1 c- d* j1 G0 z2 P     else * p$ e9 p9 e6 K; ]3 v
     girl.感情--; : D* s$ k# x- t2 `! z" ~
     boy.拼命赚钱(); / [/ I8 B) m/ Y: `6 w0 x) h
     }
% q, V- P. m3 x1 a/ z# W     }
) v& I5 _$ G7 I) s( w. b        if( boy.有房() and boy.有车() )
2 i5 j6 x9 i% ?# q8 p3 c        { 9 Y2 Q; V- f* K+ x) p" N
     boy.set(nothing);
& B/ n4 x' }0 n( C* H     return girl.嫁给(boy);
0 S0 Y; ]7 u9 O! e) f2 g2 M0 W     } # S8 L! k$ ]/ x
     年龄++; ! d/ X* u/ `* \" C* }# b1 K3 Z
     girl.感情--; 3 \6 p5 N! w1 _5 z
     } 4 t/ u* ^/ f% l! [, P1 R9 b) Z. h
     return girl.goto( another_boy); 5 I% O& D1 R" J- A4 i( w& M  O
     }
) d6 w& s  H  U% k
. b& s; ?5 E' y6 N
1 B' ]* v% ?( z9 Z, g: I5 z0 Z# w0 ]% Q- e3 {1 W0 k2 \
有网友问:运行后的结果是什么。。。。。。。。。: m6 f$ `, b& N% C2 @
# h( @4 i6 f2 W! I* R  E

8 q, G5 b# ]3 u+ }1 p9 ?
, s  @" n) R( d8 J: U有网友回:变成老处女。。。。。。
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发表的 :
8 s, D; Y( |7 r! h- y- g; O5 t有网友回:变成老处女。。。。。。
错了,有这些她一定会被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, 2026 年 10 月 11 日 02:48 , Processed in 0.076251 second(s), 21 queries .

Powered by Discuz! X5.0

© 2001-2026 Discuz! Team.

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