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

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl)
; b4 F! r6 j3 U6 o6 Y* m) w' R    {
9 H4 V1 d+ k: h8 _5 M4 ~    if( boy.有房() and boy.有车() )
) m6 g* b" H5 U" B9 m8 \) }    { % D8 ^5 E  O- j8 D4 i
    boy.set(nothing);
6 Y" G- b; h( B: z0 i     return girl.嫁给(boy);
8 P5 S" v6 B. N      }
8 S; g& G) o8 K% t' r    if( girl.愿意等() ) * A. e& u8 k5 j2 G; W" C
     { ) X4 c( a) |, p, j( _! l# {, y/ _
     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) 7 s5 |& ^+ l5 _
     {
- D( E/ b6 w3 ]: ?  x2 R7 k     for( day=1; day <=365; day++)
5 i  Q& T1 ]% M, D, @( S* [     { & z& Z% c. ]' `- j7 }+ ^
     if( day == 情人节 )
7 {! }9 B+ P4 }     if( boy.givegirl(玫瑰) )
8 p9 j% u: N. M! c+ f/ P     girl.感情++; 7 m8 _% h2 g: P1 C1 W
     else
% P# ]% S5 \7 h, x2 J; h9 t     girl.感情--;
& b- r: l# ~# X; n" R0 K   6 k8 [1 g  K! ^/ H6 k2 j
     if( day == girl.生日)
" K# {0 r) w: Z     if( boy.givegirl(玫瑰) ) , U5 g$ U+ D/ j! F& n- }
     girl.感情++;
* t' g) e9 N& u, X4 m6 {     else " I+ @! m5 f$ j7 V$ e+ p
     girl.感情--; 0 j1 K9 _! l9 r2 P
     boy.拼命赚钱();
, c- W6 n7 F( U% M     } ; ~, v+ G6 }4 i4 C: i4 B( G+ y
     } % F5 U7 |; Y$ l+ _- ^' Q8 c3 [
        if( boy.有房() and boy.有车() )
4 u! t' V. i; D# i        { 2 y% z! K* I" o$ _
     boy.set(nothing); ; r4 H2 S; E2 a; }- c8 F
     return girl.嫁给(boy);
. {2 _0 s5 Z. |, E+ }5 j     }
: f4 S+ e0 q* M, P  K$ n3 @     年龄++;
. t' @% l1 T1 h6 M$ P( C1 o' i' \; S     girl.感情--; ' n( Z3 ]6 I: M  F* o
     } . u; g0 O( e' m5 P9 V8 v/ \
     return girl.goto( another_boy);
( D" o, @1 `! _" D+ Y" z     }. `  K& C) L  A
5 k7 S) p# I9 l
5 r, K- Z: Q2 N% z! O2 o. Y
; W# f# R2 X& \# C; x
有网友问:运行后的结果是什么。。。。。。。。。6 b- m5 d( i: Q/ p/ K

' w6 |3 B1 X5 A# F/ ^& R; X/ f, J$ `' r3 p3 {; \

6 A% W! x* t3 L) ~" _: l有网友回:变成老处女。。。。。。
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发表的 :* V4 t" X) @7 A& m) m7 T3 E4 b& V
有网友回:变成老处女。。。。。。
错了,有这些她一定会被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 日 20:16 , Processed in 0.086608 second(s), 21 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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