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

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl)
; }  ?( U: b$ t4 {7 {8 {7 i    { 0 _- k- j6 S7 D
    if( boy.有房() and boy.有车() )
6 f; a: X( K! v: B    { # P6 ~1 n& `4 q5 I, o% c/ c
    boy.set(nothing); ( G0 S, \7 Q7 k3 N
     return girl.嫁给(boy); 2 I/ I1 k2 y# I" G( _
      } 4 T& ~0 ^2 ~# B+ \3 w
    if( girl.愿意等() ) # U8 y. k( f) t4 A. a2 m; r
     { : ~3 b. ?  b8 \$ _
     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) )
& T! ~4 h7 G8 E7 }$ x' ~8 t1 B     { . x& \4 R8 c3 g) c" Z  ~2 j) t
     for( day=1; day <=365; day++)
. \# j! E. z9 E" j  t) A     { . @2 |' A/ S/ v
     if( day == 情人节 )
! u/ t# [- q# A. z) _! [9 C+ Z     if( boy.givegirl(玫瑰) )
' r9 _1 G) Q! @2 p     girl.感情++;
' r7 G2 U. F; L& c7 N0 h     else
" d! j( Q# ]0 i) a/ Y" K     girl.感情--; 1 l  z+ W/ _: l+ G
  
5 U! Y) z& B; V9 r% U* ^     if( day == girl.生日)
7 X4 H6 x9 e3 R+ K5 C     if( boy.givegirl(玫瑰) )
3 t  _, E) y, I+ h4 h6 l7 S     girl.感情++;
% D, i( I8 D! z     else # p2 o1 e" b: U$ B5 o- S1 h
     girl.感情--;
. T. m3 o7 a9 x     boy.拼命赚钱();
. k* X. w: g/ ]3 H4 _     }
4 _. U5 v$ S) \* U5 {     }
3 U3 [0 K3 I  E. }2 f        if( boy.有房() and boy.有车() ) 1 e$ R8 G% y7 O+ J7 f3 J
        { 7 U& ^* G1 M, ]
     boy.set(nothing);   y6 w8 T% h8 r
     return girl.嫁给(boy);
9 Y1 e6 a3 [. W$ J* x# X$ l     } & d( X; m' _- _
     年龄++; % |/ v3 S1 R6 S1 W9 m$ R; I
     girl.感情--; + J3 l4 i+ w" }  O1 B
     }
( o) B* A, x: G' p$ ]! b     return girl.goto( another_boy); 2 C+ }" _0 e) |
     }. t; x! d) K& e
3 n( ^/ r. L- J) |

$ I8 i6 b* s& t  M
3 E: Q. d7 M, u& B. h% K有网友问:运行后的结果是什么。。。。。。。。。
6 i9 T  |* q' Y) d. {! [0 R7 k
7 m+ O: _5 p1 n" x# [
: |( R- A0 E7 {6 G7 }
0 a; A- H) M8 ?有网友回:变成老处女。。。。。。
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发表的 :
2 M+ q" e; w, ~0 y9 x- a, ~3 `. H有网友回:变成老处女。。。。。。
错了,有这些她一定会被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 月 24 日 12:35 , Processed in 0.018572 second(s), 21 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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