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

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl) ( f$ C8 O! w) g1 v' G
    { ( u7 V- b/ z" ^: s0 I2 p
    if( boy.有房() and boy.有车() ) ; ]3 e7 g, B& W) Z+ \; _7 J! j
    {
0 u* f# P( T. Y; _4 U, h) }& o, N7 E    boy.set(nothing); / P6 C2 L/ d/ p1 `$ R0 w  }& p! J6 W) r
     return girl.嫁给(boy);
* j. n5 B/ [. J! U9 K      }
  P# ^  X& H; O3 V    if( girl.愿意等() )   k7 y" f3 f# ]( N0 U4 t3 Q
     {
: Z. \8 R/ F  }" J0 l     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) # L5 l# X7 U& |0 u" c+ P+ u
     {
, D* E! }. [* p% v: s     for( day=1; day <=365; day++) " `4 R; \+ E2 V& U
     {
$ Y1 s. m/ k' [: Z! N     if( day == 情人节 ) / V1 n  s1 o4 s7 X  X
     if( boy.givegirl(玫瑰) )
7 |5 l8 m% @* x8 I$ d# T     girl.感情++;
5 L% \( r( B! L' t. S     else 9 T* |* u$ g$ {* ~8 y1 l: M! C  a
     girl.感情--; . y) h9 ]* ?% v9 A
  
# M+ @  `/ q1 I  l/ g     if( day == girl.生日)
1 W# B3 ]6 N- i3 b     if( boy.givegirl(玫瑰) ) - R9 v3 T4 t2 P& D' e/ V5 P
     girl.感情++; + k2 t+ J/ n  G8 }- [. c5 x% Z
     else
$ u0 p1 ~: z5 [) H     girl.感情--;
5 N1 @$ R0 v8 b: M0 t) q8 C& a     boy.拼命赚钱(); 8 e4 t5 N3 p& f) m$ g5 I+ {: F
     }
1 Q5 W( i! ^; ~8 b     } + G% ]. s8 m" N" u* z, L* ~
        if( boy.有房() and boy.有车() )
# w  ?4 A* _. m) l0 ?) g0 \        { 2 o  O" u& F9 X% s3 J) X. X- Q: i! F: {
     boy.set(nothing);
" i% X% a/ r$ O& n# N     return girl.嫁给(boy);
. x- t! W6 \8 b4 M* ]% ?     }
9 r, u! F6 a. @     年龄++;
' z  r* M( p$ j' M9 x     girl.感情--;
- e1 y3 e/ b  V4 E& x+ \' E$ }& P  X     } ( L6 s8 Q- E0 o) c' u# \
     return girl.goto( another_boy);
0 H# x$ b7 I9 R2 c4 {% P     }
: f% G& `( f( j/ ~& q, I# @: i' P! W7 u4 V3 a  T) X9 Q' T

9 t5 z! v3 \+ z5 w3 i2 U
% @. H0 G. {7 w/ S有网友问:运行后的结果是什么。。。。。。。。。
4 ^: C8 {2 E/ e* ~1 g2 E1 h0 t, o, Y/ `2 e  ^5 ^6 m

( T" @' P8 r- P) S! _( N9 X0 k' B5 G* h% [8 E
有网友回:变成老处女。。。。。。
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发表的 :* l6 _7 h9 o2 u& y
有网友回:变成老处女。。。。。。
错了,有这些她一定会被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 年 6 月 26 日 04:31 , Processed in 0.061610 second(s), 21 queries .

Powered by Discuz! X5.0

© 2001-2026 Discuz! Team.

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