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

一个女孩写的经典程序

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

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

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

×
  result love(boy, girl) * m$ a, T. S2 B2 n2 G2 C8 j/ y: k
    {
4 T% ^( @; [  e  m  z( h- I, ], z* R# Q    if( boy.有房() and boy.有车() ) 8 L6 l0 i: w8 X8 ?
    { * [7 b# l5 t! U3 C/ j
    boy.set(nothing);
$ u3 i9 ^; \. r* g     return girl.嫁给(boy); 3 t. w6 v9 y8 ^6 |3 Y, O7 E  Z+ P
      } / d2 k8 C) s8 d. }: a
    if( girl.愿意等() ) * l+ \  L- S7 |( m( T8 c1 n
     { 2 ]8 B4 Y1 ?! ]+ q' Y
     while(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) $ W$ |" u" A' a6 }1 L
     {
. r( E4 i* k3 U6 q6 r+ F! u6 W" j     for( day=1; day <=365; day++) . g2 d' E1 n' A/ w; t' ~  l
     {
/ ~& Q! n5 G8 d: R) g5 B# c     if( day == 情人节 )
1 j  ~7 h% m& I7 J4 e1 B; f0 Q     if( boy.givegirl(玫瑰) ) : l4 m, Y- {$ g
     girl.感情++; & {2 |/ S9 ]& _; F
     else
6 K0 P0 h6 {7 c' s; _9 w  ]     girl.感情--; + w( C/ \3 s" Z* q! {! M
  
+ y6 [8 O8 ?6 t' ~     if( day == girl.生日)
" C: S+ D6 ^  I/ ]6 `' y     if( boy.givegirl(玫瑰) )
/ y$ ?, |: n1 r$ G8 Q8 |     girl.感情++;
  [% O0 M8 B  Q6 U     else 2 f1 D8 i  l( w3 y
     girl.感情--; ( I) H# a3 V0 @3 c" p
     boy.拼命赚钱();
! N4 n0 K, b1 ^' S     } 1 V- ?$ N; V  t9 C; y+ i
     } 9 r1 V1 y6 Q& T6 @8 x! [
        if( boy.有房() and boy.有车() )
4 h( R; _- _! t4 H0 b: x' o" h8 G! W        {
- H0 \" y4 N. c8 ^3 R) I0 ^     boy.set(nothing);
( I: V+ x- g2 q3 t0 ~     return girl.嫁给(boy); 1 n1 G: B8 \7 x0 I1 h8 x4 P
     } ' l) q( e* C5 v( v( d+ l
     年龄++;
5 ^4 W$ i) K+ J     girl.感情--; 3 X  F( h8 N" w! E: s! q% s
     } 8 h. w2 J) |" m3 v" d. k8 h$ Y
     return girl.goto( another_boy);
4 r4 I9 I1 c/ Z' F5 H: m7 j) U     }
& @$ A# N6 Y- I& M/ V9 Z+ N3 P5 i, F8 R. q

* |9 `* o7 N1 i; }* w) D6 {' ]: O6 ]; P1 i' o7 Q/ `& o
有网友问:运行后的结果是什么。。。。。。。。。/ X/ Z1 m4 K3 @5 f9 f3 [6 u6 I
  C! Z* R6 T- \2 g- ~

6 W+ `6 h7 ]2 S9 q9 c2 l0 F) J& `; J4 O6 K# w3 s
有网友回:变成老处女。。。。。。
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发表的 :0 J; o: O8 o' _: X* Q' z( 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 年 4 月 22 日 05:56 , Processed in 0.018630 second(s), 22 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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