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

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl) * N- J5 W' O9 ^* D( F4 i
    {
+ H  p7 j/ S5 Q7 i  g    if( boy.有房() and boy.有车() )
( A! x/ q( v1 r$ T9 Q+ }    {
# u' Y# x- r" g: ?. k# {) E/ W2 n: |    boy.set(nothing); , K' M+ E3 j0 U$ C
     return girl.嫁给(boy);
, t7 j% a/ z5 \, n2 ~1 |0 s" p      } + Y) t9 y2 k, ^4 f) E  e
    if( girl.愿意等() ) + r2 l7 ?: U% o& s1 a! S$ `3 d
     {   e. t" E9 s# v9 K. T
     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) ! O+ `+ J- }- p5 ~5 d6 v7 X
     { ' d8 |; v8 [0 m1 S$ {, _  {+ f
     for( day=1; day <=365; day++) $ H* q( p; C$ A$ Z1 j1 E
     { 5 J# Q' g3 C0 V4 {$ S8 g
     if( day == 情人节 )
5 X1 n' J5 K8 p9 ^7 `" }/ z     if( boy.givegirl(玫瑰) )
- h" t  {* f$ A9 m  Q     girl.感情++;
* C) n" e4 l2 ~) ]  Q     else
  b# f& }  M+ H: h+ l     girl.感情--;
3 O+ B- d3 e3 a" [: O   ) y6 K$ ]+ Z5 H. U' u- }8 |& p
     if( day == girl.生日) 2 K( s; u! Y: R7 {, l
     if( boy.givegirl(玫瑰) )
7 |  b0 U3 v( [) g% W2 Y9 ]     girl.感情++; # \* @# V5 H0 B% A6 ~  Z: \# E
     else ( |/ d& i2 C- L/ r
     girl.感情--; 0 T9 [, l  A8 E. m! `' v  S
     boy.拼命赚钱(); 6 T0 p3 ?6 q3 g+ m3 T! o4 {
     } % B% F  y, e  @9 M4 \
     }   b8 _6 ^* `  j0 m. n
        if( boy.有房() and boy.有车() ) 1 @) R! q4 n! U+ G! x& w* V9 f
        {
4 N7 m, k7 N& F9 n: }+ Q; S     boy.set(nothing);
, Q9 t. i9 s! A! U, O     return girl.嫁给(boy); ; a/ y1 c0 m3 m0 |3 A
     }
1 ]/ g0 `' j3 X. Z6 e  R. A     年龄++; : ?) q) U( K; k- M8 g0 s
     girl.感情--; ( _3 u7 N& D2 G! R9 N6 N/ E. b& P
     }
5 @% S( x8 o/ g5 ?8 `4 `     return girl.goto( another_boy); " k8 e5 Q: w. D
     }
, Y2 }4 \) v7 ~$ O0 r* f$ Z4 P8 ]; G2 C# B2 o

4 D+ y9 W) x( p7 |# A( ]/ |
, _" q$ G4 I) `: V. l: W7 J- Q  t有网友问:运行后的结果是什么。。。。。。。。。# {5 _9 E6 x* n; ^& b2 q
, E9 U* S" E7 l/ K% Y! h
' Z! `3 Q2 R* ~0 O6 v
7 F( s2 i0 j6 J  Z. O4 _
有网友回:变成老处女。。。。。。
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发表的 :  a: G! S6 k4 m4 H- H- E
有网友回:变成老处女。。。。。。
错了,有这些她一定会被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 年 2 月 12 日 19:47 , Processed in 0.085329 second(s), 22 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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