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

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl)
: A% C: _% y# a0 ~8 l    { / w* H% U: _; l6 O1 E* o7 j4 s
    if( boy.有房() and boy.有车() ) ! E3 T, L2 w% ~9 s: u' c
    {
  B4 {1 r9 T) [/ @# t2 m    boy.set(nothing); + [- z; P- H7 K! u% M) l0 c( C3 o
     return girl.嫁给(boy);
& {' c' ]  l" H      }
/ I0 b7 _' U7 }, y8 x+ Z    if( girl.愿意等() ) - P$ r$ ?6 g, H/ `( J. Y& V1 i7 I1 v
     {
3 y) Q. E6 Q6 M  v1 A/ P  O1 E" h: z     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) )
; S8 V$ E# G( {. [     { 3 p/ F* M9 G7 z6 x9 a4 z6 j! z
     for( day=1; day <=365; day++)
/ X5 z$ h# R8 }  s3 E( L     { 7 C# ~: M$ K9 z
     if( day == 情人节 )
; v+ i! g1 H* s( k7 e     if( boy.givegirl(玫瑰) )
* u8 b. K3 g6 {1 J  d& y5 [     girl.感情++;
% e: O  Z% I. w7 w9 z     else
; Z0 _& I- ^7 b% o# y$ L/ N     girl.感情--; 3 U5 G: K' S& F, p. m3 ?
  
' v8 {  q7 ~+ |! a# |4 U7 e( Q     if( day == girl.生日)
% J( f3 i6 l" C; U     if( boy.givegirl(玫瑰) ) 6 G  u0 n9 _  q$ x+ p: T
     girl.感情++; 9 S( k( f( }3 l! D1 X1 O0 h% @+ V
     else
8 m9 W5 M) `9 O* y0 v- L/ |" @7 }     girl.感情--;
- s9 y6 `1 ]" s: H8 R- F     boy.拼命赚钱(); - K9 \1 z8 d+ G+ P, h# v7 V; L
     } ( T2 ]. `- f) O; D5 E! o
     } ; K2 k0 _) }7 d( j$ j6 T
        if( boy.有房() and boy.有车() )
7 d: n+ H' _$ ?% R% ]9 {7 C        {
, z! E' s/ ^, o     boy.set(nothing); ) _. b3 v- k8 A! e: B
     return girl.嫁给(boy);
( y" F6 `: Y& N     }
# o) C# N- v, q     年龄++; " A2 S2 b9 M: Y: O4 A; h8 n! f
     girl.感情--; / A  H8 g$ q" H$ k9 Y
     }
% z) k: s' b' ^4 z     return girl.goto( another_boy);
/ Q3 t3 U7 r4 j& ]! i     }
7 G( f; j6 c% p" C! Z9 @
% D% O; g# V+ ~4 _' l! ^' ]! h; o+ f/ a

5 Q- S- S# {% w' X% V$ q有网友问:运行后的结果是什么。。。。。。。。。) Z( n0 r2 M3 L: k# k( F, G
3 F( m% Z+ X% D7 j' r* R
+ v: ]% \0 f4 e) W+ j

" D. t$ o6 m7 q. X) ^有网友回:变成老处女。。。。。。
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发表的 :
6 v% s3 ~* \3 ?+ x3 U有网友回:变成老处女。。。。。。
错了,有这些她一定会被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 月 22 日 10:12 , Processed in 0.019743 second(s), 20 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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