programxunhuan(input,output);
vari,j,k:integer;
begin
fori:=1to9do
forj:=0to9do
fork:=0to9do
ifi*i*i+j*j*j+k*k*k=i*100+j*10+...
vari,j,k:integer;
begin
fori:=1to9do
forj:=0to9do
fork:=0to9do
ifi*i*i+j*j*j+k*k*k=i*100+j*10+...
[ 查看全文 ]
programxunhuan(input,output);
vari,j,k:integer;
begin
fori:=1to6do
begin
forj:=1to6-ido
begin
...
vari,j,k:integer;
begin
fori:=1to6do
begin
forj:=1to6-ido
begin
...
[ 查看全文 ]
programJiuJiu2(input,output);
var
i,j:integer;
begin
i:=1;
whilei<10do
begin
j:=1;
whilej<=ido
...
var
i,j:integer;
begin
i:=1;
whilei<10do
begin
j:=1;
whilej<=ido
...
[ 查看全文 ]
programJiuJiu1(input,output);
var
i,j:integer;
begin
fori:=1to9do
begin
forj:=1toido
write(i*j:4);
...
var
i,j:integer;
begin
fori:=1to9do
begin
forj:=1toido
write(i*j:4);
...
[ 查看全文 ]
programzdgys1(input,output);
varm,n,r:integer;
begin
read(m,n);
if(m<n)then
begin
r:=m;m:=n;n:=r;
end;
r:=1;
whi...
varm,n,r:integer;
begin
read(m,n);
if(m<n)then
begin
r:=m;m:=n;n:=r;
end;
r:=1;
whi...
[ 查看全文 ]
我的国庆节
一、电话和OICQ
9月30号中午，我拨通了家里的电话。问我父亲：“我要不要回去？”父亲说：“整整一个星期，你不回来在那儿干什么？”我心里可急了，我还要跟美眉见面呢，回家去可没这个自由了。昨天我就和花儿的花说了要去她家玩的。
记的我在OICQ上问花儿的花：“国庆节有什么打算？”花儿的花说：“陪朋友们玩。”我问：“不回家吗？”花儿...
一、电话和OICQ
9月30号中午，我拨通了家里的电话。问我父亲：“我要不要回去？”父亲说：“整整一个星期，你不回来在那儿干什么？”我心里可急了，我还要跟美眉见面呢，回家去可没这个自由了。昨天我就和花儿的花说了要去她家玩的。
记的我在OICQ上问花儿的花：“国庆节有什么打算？”花儿的花说：“陪朋友们玩。”我问：“不回家吗？”花儿...
[ 查看全文 ]
programzdgys(input,output);
varm,n,r:integer;
begin
read(m,n);
if(m<n)then
begin
r:=m;m:=n;n:=r;
end;
repeat
...
varm,n,r:integer;
begin
read(m,n);
if(m<n)then
begin
r:=m;m:=n;n:=r;
end;
repeat
...
[ 查看全文 ]
programqiuzhouci(input,output);
varlen,czdate,czyue,zc,month,dates,days:integer;
begin
czyue:=12;
czdate:=23;
zc:=18; write('pleaseinputmonth:');read(month);
...
varlen,czdate,czyue,zc,month,dates,days:integer;
begin
czyue:=12;
czdate:=23;
zc:=18; write('pleaseinputmonth:');read(month);
...
[ 查看全文 ]
programproWhile(input,output);
var
a:integer;
begin
a:=1;
whilea<1000do
begin
writeln(a);
a:=a+a;
...
var
a:integer;
begin
a:=1;
whilea<1000do
begin
writeln(a);
a:=a+a;
...
[ 查看全文 ]
programproRepeat(input,output);
var
a:integer;
begin
a:=1;
repeat
writeln(a);
a:=a+a;
untila>1000
end....
var
a:integer;
begin
a:=1;
repeat
writeln(a);
a:=a+a;
untila>1000
end....
[ 查看全文 ]
programQiuHe(input,output);
var
i:integer;
s:integer;
begin
s:=0;
fori:=1to10do
s:=s+i;
writeln(s);
end....
var
i:integer;
s:integer;
begin
s:=0;
fori:=1to10do
s:=s+i;
writeln(s);
end....
[ 查看全文 ]
programPi(input,output);
vari:integer;
s:real;
begin
s:=0;
fori:=1to1000do
begin
s:=s+1/(4*i-3)-1/(4*i-1);
end;...
vari:integer;
s:real;
begin
s:=0;
fori:=1to1000do
begin
s:=s+1/(4*i-3)-1/(4*i-1);
end;...
[ 查看全文 ]
programGeWeiHe1(input,output);
var
x,s,t:integer;
begin
read(x);
s:=0;
repeat
t:=xmod10;
s:=s+t;
x:=xdiv10;
untilx=0...
var
x,s,t:integer;
begin
read(x);
s:=0;
repeat
t:=xmod10;
s:=s+t;
x:=xdiv10;
untilx=0...
[ 查看全文 ]
programGeWeiHe(input,output);
var
x,s,t:integer;
begin
read(x);
s:=0;
whilex>0do
begin
t:=xmod10;
s:...
var
x,s,t:integer;
begin
read(x);
s:=0;
whilex>0do
begin
t:=xmod10;
s:...
[ 查看全文 ]
programshuxiang(inout,output);
{12Shengxiao}
varyear:integer;
sx:string;
begin
write('inputnidechushengnian:');read(year);
case(year-1986)mod12of...
{12Shengxiao}
varyear:integer;
sx:string;
begin
write('inputnidechushengnian:');read(year);
case(year-1986)mod12of...
[ 查看全文 ]
programtuxing(input,output);
varh,k:integer;
begin
forh:=1to4do
begin
write...
varh,k:integer;
begin
forh:=1to4do
begin
write...
[ 查看全文 ]
programlt1_1(input,output);
var
a,b,x:integer;
Begin
a:=3;
b:=4;
x:=a;
a:=b;
...
var
a,b,x:integer;
Begin
a:=3;
b:=4;
x:=a;
a:=b;
...
[ 查看全文 ]
节假日回家跟父母团聚，还来了几个客人。饭后，客人说：“你们这代人真幸福：当年你们小时，你爷爷奶奶不肯带你们，都是你父母一边干活一边拉扯你们；到现在你们有孩子了，都是爷爷奶奶帮你们带孩子，你们一点心不用分心。”
听到这儿，我说：“我以后有了孩子不用父母带。”众人便问：“那你给谁带？”我说：“我宁愿花钱给托儿所带。”父母异口同声说：“有那么多钱给了我，我就带不好孩子了？...
听到这儿，我说：“我以后有了孩子不用父母带。”众人便问：“那你给谁带？”我说：“我宁愿花钱给托儿所带。”父母异口同声说：“有那么多钱给了我，我就带不好孩子了？...
[ 查看全文 ]
引言、男女有别
男人从来不上街，哪天缺少东西了上街买一下，然后又是几天不去；女人没事就上街，在超市走一圈会买上百块钱的东西。
男人虽然上街少，但是要用的东西都买；女人天天上街，但是只买衣服、零食和化妆品。其它能借就借。
男人即使哪天上街逛逛也只是在街道上走走，是真正的“逛大街”；女人逛的不是街，而是服装店。
男人也买衣服，都是看中了一件付了钱就走；女人几乎每件都试穿一下，每穿一件都对着镜子照半天，很可能一件都不买。...
男人从来不上街，哪天缺少东西了上街买一下，然后又是几天不去；女人没事就上街，在超市走一圈会买上百块钱的东西。
男人虽然上街少，但是要用的东西都买；女人天天上街，但是只买衣服、零食和化妆品。其它能借就借。
男人即使哪天上街逛逛也只是在街道上走走，是真正的“逛大街”；女人逛的不是街，而是服装店。
男人也买衣服，都是看中了一件付了钱就走；女人几乎每件都试穿一下，每穿一件都对着镜子照半天，很可能一件都不买。...
[ 查看全文 ]
护花使者（一）
我和蚊子打架，我输了，逃了。这些蚊子，想喝血就喝吧，偏要在我耳边叫，我就打，它再叫，我再打。最终我算服了：老子斗不过你，我让位，你睡我的床，我出去游荡吧。
时间才凌晨两点半，外面的空气格外新鲜，天上虽然面满了云，但这些云似乎都很慷慨，肯放月光下来。——今天是农历四月廿五，后半夜应该有月亮，虽然我看不过它，但我想我猜得没错。——再加上校园里倒处是路灯，照得我周围亮如白昼，不同的只是少了白天的喧哗。踩在校园里...
我和蚊子打架，我输了，逃了。这些蚊子，想喝血就喝吧，偏要在我耳边叫，我就打，它再叫，我再打。最终我算服了：老子斗不过你，我让位，你睡我的床，我出去游荡吧。
时间才凌晨两点半，外面的空气格外新鲜，天上虽然面满了云，但这些云似乎都很慷慨，肯放月光下来。——今天是农历四月廿五，后半夜应该有月亮，虽然我看不过它，但我想我猜得没错。——再加上校园里倒处是路灯，照得我周围亮如白昼，不同的只是少了白天的喧哗。踩在校园里...
[ 查看全文 ]
讲述两位网友之间的故事，根据偷猫同名小说改编。同名小说《虫子传》请到本站“写作园地”栏目查找，而不要点FLASH中的链接（因为那是当时用旧个人主页时做上去的）。...
[ 查看全文 ]
毕业前那段最轻松的时期，我整日地和女友在一起。所有同学都没什么事干，但人家要利用这样悠闲的时光来上网或是打游戏。但我不一样，我接触电脑和网络比别的同学要早几年，所以，人人热衷于此的时候，我早没那么大的兴趣了。
曾在网上看到过一句话，大意是这样的：“女友像衣服一样，要多泡”。这个“泡”字是不太合适的，至少我见过的女孩都不愿意听见“自己被某人泡”之类的话。但是我不防借这个字用一下，就像毛泽东能给“实...
曾在网上看到过一句话，大意是这样的：“女友像衣服一样，要多泡”。这个“泡”字是不太合适的，至少我见过的女孩都不愿意听见“自己被某人泡”之类的话。但是我不防借这个字用一下，就像毛泽东能给“实...
[ 查看全文 ]
三、喂鹿
我们见到一处用网围了几百只白鸽，在网外可以看到白鸽，如果要跟鸽子亲近，可以花一块钱买一袋鸽饲料进去喂鸽子。透过网，我们见到几个小姑娘正将鸽饲料托在手心里，鸽子大胆地走过来啄食。看来鸽子是不怕人的，唉——如果有一天全世界的动物都不怕人，那就是我们整个地球的大福了。
游园过程中，老婆一直在问“动物园在哪儿”，上次我来红梅公园根本就没有进动物园，我哪知道在哪儿？只能边走边看了。总算让我们给找着了，原来红梅公园的动物园...
我们见到一处用网围了几百只白鸽，在网外可以看到白鸽，如果要跟鸽子亲近，可以花一块钱买一袋鸽饲料进去喂鸽子。透过网，我们见到几个小姑娘正将鸽饲料托在手心里，鸽子大胆地走过来啄食。看来鸽子是不怕人的，唉——如果有一天全世界的动物都不怕人，那就是我们整个地球的大福了。
游园过程中，老婆一直在问“动物园在哪儿”，上次我来红梅公园根本就没有进动物园，我哪知道在哪儿？只能边走边看了。总算让我们给找着了，原来红梅公园的动物园...
[ 查看全文 ]
二、新奇世界
两个坡都冲过，便到了终点。我长舒了一口气，还好，我还活着，虽然心还在狂跳，总算没事了。走吧，以后再也不玩刺激了。我们继续往前走，咦，那是什么？碰碰车？碰碰车是好东西，我要坐。于是，我们包了两辆车，我和老婆一辆，他们夫妻一辆，加上别的游客，坐满了。准备，只听见“铃……”一声，别人的车都开起来了，我的车怎么不动？找找，哦，脚下有个“油门”，踩！动了，出发！
我从来没开过碰碰车，但是我...
两个坡都冲过，便到了终点。我长舒了一口气，还好，我还活着，虽然心还在狂跳，总算没事了。走吧，以后再也不玩刺激了。我们继续往前走，咦，那是什么？碰碰车？碰碰车是好东西，我要坐。于是，我们包了两辆车，我和老婆一辆，他们夫妻一辆，加上别的游客，坐满了。准备，只听见“铃……”一声，别人的车都开起来了，我的车怎么不动？找找，哦，脚下有个“油门”，踩！动了，出发！
我从来没开过碰碰车，但是我...
[ 查看全文 ]
一、激流勇进
劳动节，本想出去的，不想有别人“出去”，我就出不去了。——我连襟和大姨到我这个妹婿家玩，我就出不去了。
他们是劳动节这天下午到的，我们两人在常州接他们，然后先去天宁寺跟泥菩萨见了个面，没烧香。第二天，四人一起游红梅公园。
上午八点左右到了常州，先去大润发买了些吃的东西带着，从大润发出来，路对面就是红梅公园的东门。门口的阿姨见我们四人走过去，立即迎出门外，并往旁边一指：“去那边买票。...
劳动节，本想出去的，不想有别人“出去”，我就出不去了。——我连襟和大姨到我这个妹婿家玩，我就出不去了。
他们是劳动节这天下午到的，我们两人在常州接他们，然后先去天宁寺跟泥菩萨见了个面，没烧香。第二天，四人一起游红梅公园。
上午八点左右到了常州，先去大润发买了些吃的东西带着，从大润发出来，路对面就是红梅公园的东门。门口的阿姨见我们四人走过去，立即迎出门外，并往旁边一指：“去那边买票。...
[ 查看全文 ]
关于《大饱兔之红楼外梦》的说明：
我于1999年底来到西祠，当时经常活动的版块是胡同口的几个大版，如《哈哈一笑》、《签名集锦》、《文昌阁》、《扬州分站》等。1999年12月24日，我在哈哈一笑发表了《大饱兔之红楼外梦》第一回，后来又陆续写了几回，至2000年2月29日，一共写了十回。然后我就一直没有写下去，再然后就宣布停止写笑话连载。记得当时大饱兔在QQ中要求我继续写下去，我拒绝了，想来真是对不住大饱兔的厚爱。这么长时间来我还是一直在写文章，但都是随感、游记、散文和评论。前阵子见大...
我于1999年底来到西祠，当时经常活动的版块是胡同口的几个大版，如《哈哈一笑》、《签名集锦》、《文昌阁》、《扬州分站》等。1999年12月24日，我在哈哈一笑发表了《大饱兔之红楼外梦》第一回，后来又陆续写了几回，至2000年2月29日，一共写了十回。然后我就一直没有写下去，再然后就宣布停止写笑话连载。记得当时大饱兔在QQ中要求我继续写下去，我拒绝了，想来真是对不住大饱兔的厚爱。这么长时间来我还是一直在写文章，但都是随感、游记、散文和评论。前阵子见大...
[ 查看全文 ]
【有关本文的说明】 写这篇文章，是为了救一个人，救一个做了三年梦的人，估且称他为梦中人吧。梦中人整整做了三年的浪漫梦，他爱上了一个女孩，并且两人往来了三年。但是，就在这几天，他失恋了。以他自己的话说，他为那个女孩不惜一切，要什么给她什么，但是她却还骂他小气。只好分手了。 不妨先来看一看这是怎么一场爱： 一、三年前梦中人只有21岁，如果按周岁算只有18岁。 二、那个女孩在地球的反面，和他距离几万公里，他们的来往是网络和书信。 三、他和她一起玩网络游戏，在游戏中，要不断地泡分、不断地练武、...
[ 查看全文 ]
我的常州之行（1、风尘仆仆）
现在是早上五点半，我又在聊天室里度过了一个通宵。等EYES离开了聊天室，我也立即点了个“离开”，然后关了计算机。
我先上三楼，将自己的电脑搬了下来。我早就不用自己的电脑了，因为父亲要我把电脑搬回家。至于是哪天回去，我也一直没有决定下来。此时，我先将机箱拆开，从中把硬盘拆了下来，放进上衣口袋里，这样做，是为了妨止路上的巅簸把硬盘震坏，又将音箱、显示器等统统装好箱。一切安排结束，已经到了六点钟，我出门叫了一辆TAXI便...
现在是早上五点半，我又在聊天室里度过了一个通宵。等EYES离开了聊天室，我也立即点了个“离开”，然后关了计算机。
我先上三楼，将自己的电脑搬了下来。我早就不用自己的电脑了，因为父亲要我把电脑搬回家。至于是哪天回去，我也一直没有决定下来。此时，我先将机箱拆开，从中把硬盘拆了下来，放进上衣口袋里，这样做，是为了妨止路上的巅簸把硬盘震坏，又将音箱、显示器等统统装好箱。一切安排结束，已经到了六点钟，我出门叫了一辆TAXI便...
[ 查看全文 ]
最初有这个想法，是因为母亲的“破衣论”。
常有人对母亲说：“你这么旧的衣服还穿啊？扔了吧？”母亲总是说：“这衣服还没破，怎能扔掉呢？”长时间以来，母亲总是穿着旧衣服，连邻居都看不下去了，有时劝她几句，母亲从来不买新的，因为旧的总是穿不破。
有一次，我表姐劝我母亲买新的衣服穿，母亲还是这么说，表姐不由分说拿起一把剪刀就要帮母亲剪衣服——当然不会真剪了，母亲忙夺回了，说剪破...
常有人对母亲说：“你这么旧的衣服还穿啊？扔了吧？”母亲总是说：“这衣服还没破，怎能扔掉呢？”长时间以来，母亲总是穿着旧衣服，连邻居都看不下去了，有时劝她几句，母亲从来不买新的，因为旧的总是穿不破。
有一次，我表姐劝我母亲买新的衣服穿，母亲还是这么说，表姐不由分说拿起一把剪刀就要帮母亲剪衣服——当然不会真剪了，母亲忙夺回了，说剪破...
[ 查看全文 ]
虫子传（一） 蓝天，白云。 今天似乎没有什么不一样， 对于虫子来说，今天却不一样， 非常的不一样，因为他正在会客。 难得的客人！ 对于客人来说没什么难得的，客人每天都在外漂泊，但是虫子家来客人，却是第一次。 虫子家，也已经十几年没有客人上门了。 十几年，是说自从虫子在这里住下后，就没有人来找过他。 没有人需要找他，因为没有人认识他， 认识他的人，都已经死了。 而今天来的，又是谁？ 虫子家的庭院里，此刻正站着两个人，一个是虫子，一个是客人。 除了衣服和长须在风中摆动外，两...
[ 查看全文 ]