草莓铃铃的个人资料

嗯 1217var m,f,d,b,c:integer; a:array[1..1000] of string[1];begin m:=0; repeat m:=m+1; read(a[m]); until a[m]='E'; repeat f:=f+1;d:=d+1; if a[f]='W' then b:=b+1 else if a[f]='L' then c:=c+1; if f=11 then begin writeln(b,';',c); b:=0; c:=0; f:=0; end; until d=m-1; writeln(b,':',c); writeln; f:=0;d:=0;b:=0;c:=0; repeat f:=f+1;d:=d+1; if a[f]='W' then b:=b+1 else if a[f]='L' then c:=c+1; if f=21 then begin writeln(b,';',c); b:=0; c:=0; f:=0; end; until d=m-1; writeln(b,':',c);end.

终于超过50个主题啦嗯嗯

174 const n=20;var a:string[n]; x:string; i,k,t,p:integer; f:boolean;begin readln(x); k:=length(x); while k>n do begin i:=n+1;f:=true; while f and (i>1) do begin if copy(x,i,1)=' ' then begin a:=copy(x,1,i-1); delete(x,1,i); f:=false; end; dec(i); end; k:=length(x);{p:=n-i; if p=0 then} writeln(a) {else begin t:=length(a); while (p>0) do begin if copy(a,t,1)=' ' then begin insert(' ',a,t); dec(p); end; t:=t-1; if t=0 then t:=length(a) end; writeln(a); end;} end; writeln(x); readlnend.

那些数字开头的就别看了拉~ 我的程序而已更别骂我神经病哦嗯嗯~

今天是六一哦~ 嗯~今天是六一一个差不多不属于我们的节日不过还是猪大家六一快乐吧哪怕你是在国庆才看到~呼呼好失败一年了帖子还没有过一页

158 const bunm=101; tunm=104;type studid=bunm..tunm; course=(math,phys,chem,engl,pasc); mark=0..100; scoretable=array[studid,course] of mark; avescore=array[studid]of real;var id:studid; cr:course; st:scoretable; av:avescore; i:integer; t:real; j:course;begin for i:=bunm to tunm do begin for j:=math to pasc do read(st[i,j]); readln end; for i:=bunm to tunm do begin t:=0; for j:=math to pasc do t:=t+st[i,j]; av[i]:=t/5; end; writeln;writeln; writeln(' ':10,'***Table of student,marks***');writeln; writeln(' ':5,'Num.Math.Phys.Chem.Engl.Pasc.Ave.'); writeln('_______________________________________________'); for i:=bunm to tunm do begin write(' ':4,i:5); for j:=math to pasc do write(st[i,j]:6); writeln(av[i]:6:1); end; writeln('_______________________________________________'); readlnend.

1494 zju1494 爬虫 Climbing Worm 一条一英寸长的小虫在深n英寸的井底。它有足够的力量让它在每分钟内爬u英寸，但是在再爬之前要休息一分钟。在这一分钟内，它会向下滑d英寸。这个过程不断不断不断重复。几分钟之后它会爬出井？我们把不到一分钟算成一分钟。假如小虫在某分钟的最后爬到井的顶部，我们假设它能够在这分钟内爬出来。 Input 输入包括多个输入数据，每行有三个整数：n，u，d。我们假设u>d，n<100。三个0表示结束。Output 每个输入数据应输出一个答案，一个一行。表示小虫爬出井的时间。Sample Input10 2 120 3 10 0 0Sample Output1719

2388 var i,n,a,b:integer;begin readln(n); for i:=1 to n do begin readln(a,b); if (a 0) then writeln('impossible') else writeln((a+b)div 2,' ',(a-b)div 2); end;end.

1001 var a,b:integer;begin while not eof do begin readln(a,b); writeln(a+b); end;end.

1048 var a:array[1..100] of real; i:integer; t:real;begin for i:=1 to 12 do begin readln(a[i]); t:=t+a[i]; end; writeln('$',t/12:0: 2);end.

一个世纪没来啦~哈哈哈新年快乐哦~~~

又来转恶搞的东东啦~笑死 D

与十二星座的QQ聊天与12星座聊天幽默笑话来源：时间：2006年2月11日11:40 这天,那人闲着没事,加了12个人为QQ好友,结果被送进了青山.拒报道,当时的情况是这样的. 白羊座（食古不化，气死人）那人：你好吗？白羊：这叫什么话，我不好还坐在这里上Ｑ啊！！！那人：晕，问候一下而已白羊：谁是而已？你的ＧＦ吗？那人：不是啊．白羊：那是谁那人：不知道丫，你叫什么白羊：我没叫那人：我是问你叫什么名字白羊：我没叫啊那人：汗～～你的名字是什么？白羊：我的名字是名字那人：晕死～不跟你僵了白羊：什么时候融化？那人：我是说不跟你讲了白羊：哦金牛座　（金钱本色）那人：上了一天不累吗金牛：不累那人：不怕浪费家里的钱啊？金牛：怕什么那人：上网要钱啊金牛：有什么办法？那人：？？？金牛：你说有什么办法可以在网上要钱？那人：没．．我是说上网要交钱金牛：切那人：你有办法不用交钱吗？金牛：有那人：什么办法？金牛：违法．．那人：滚．．．双子座（玩人高手，莫名其妙）那人：你好吗双子：当然好啦那人：你叫什么名字？双子：夏紫薇那人：环珠格格啊，真名叫什么呢？双子：就叫夏紫薇那人：汗～～我还是尔康呢双子：那我们就是一对的那人：唉，当我没说．．你在哪？双子：大气层中那人：具体点行吗双子：大气层中的０．８４２个微氧元子中那人：我说住哪双子：住在家里那人：你家在哪？双子：大气层中的０．８４２个微氧元子中那人：我问在这个城市的哪里？双子：东边那人：怎么走？双子：用脚走那人：算了，以后再跟你聊吧，８８双子：拜拜！巨蟹座（恋家子弟）那人：你是谁巨蟹：我才不是谁那人：你怎么会有我的ＱＱ？巨蟹：我没有你的ＱＱ那人：我问你怎么回家我巨蟹：你连自己的家都不会回？没救了那人：我是说你怎么会加我作ＱＱ好友？巨蟹：你是陌生人，不是好友那人：我认识你吗巨蟹：我怎么知道那人：你认识我妈巨蟹：我只认识我妈那人：啊？狮子座（先把你吓死，再把你骂死）那人：有空吗？狮子：我很忙！很多人找我约会呢！（哇，有人想X我！哈哈）那人：那你还忙着上Q，快去呀！狮子：你管这么多干什么那人：没，提醒你呢狮子：啊，你不吃醋吗那人：．．．我为什么要吃醋？狮子：操！你没事问什么问！那人：晕～你好粗野呀～～狮子：你说什么你有种再说一次！那人：我没种狮子：靠，没种就滚．．．．．那人：　．．．处女座（超谨慎）那人：你好吗处女：别这么虚伪，这年头哪有这么虚伪的问候那人：我是真心的呀处女：我还煮心呢那人：好毒～处女：看吧，看吧，狐狸尾巴露出来了，马上就骂人了！那人：啊．．我无淤了．．处女：你这还不淤呀，都羞死人了那人：我是说我没话说了，无语了处女：你不是正在说吗那人：你叫什么处女：chunv 那人：啊？蠢驴啊．．．．处女：居然敢骂人？！！那人：那你叫什么名字处女：chunv 那人：中文名处女：我凭什么告诉你，你想对我做什么，你快招吧，别让我来抓你那人：我是好人啊处女：坏人贴标签，见惯不怪了，识相的给我滚一边去那人：呜．．．我很无辜呀．．．处女：坏人喊无辜，小心被雷辟那人：算了，这样下去我不被你冤枉死才怪，拜拜处女：８８８天枰座（应付了事，走火入魔）那人：你好吗天枰：不坏那人：哇！终于遇上个正常点的了！！

接头涂鸦,考眼力哟~~ 居然是……画在地上的……

大家把空格去掉啊~回有好运的哦 & # 2 5 1 0 5 & # 3 5 2 0 1 & # 2 5 2 2 6 & # 2 5 1 0 5 & # 3 0 3 4 0 & # 2 0 8 4 0 & # 3 7 0 9 6 & # 2 0 1 3 5 & # 3 2 4 7 3 & # 2 6 4 7 2 & # 2 0 8 9 6 & # 2 9 8 4 0

常用音效结婚:http://file.flash8.net/sound/fx/2005/dow/44472_1081_1357.mp3

爱上一个人的8个征兆（给人转过n百次了） 1.当你正在忙时，却把手机开著，等著她/他的短信.. 你已经爱上她/他了 2.如果你喜欢和她/他两个人单独漫步.. 你已经爱上她/他了 3.当你和她/他在一起时，你会假装不注意他，但是当她离/他开你的视线时，你会急著寻找她/他... 你已经爱上她了 4.当她/他受伤或生病时，你会很关心她，替她/他著急.. 你已经爱上他了 5.当她/他和别人要好时，你会感到吃不知其味... 你已经爱上她了 6.当你看到她/他那甜美的笑时，你的嘴角会扬起一丝得意的笑.. 你已经爱上她/他了 .............. .............. ............ ............. ................................... . . . . . . . ........................................................ 7.当你看到这篇文章时，心里想到某个人 8.当你看到这篇文章后，不回贴将会一辈子没人爱，没人疼，没人陪，没人关心，没人照顾！！

呵呵，做测试做测试 http://www.mini38.com/mimi/me.asp?sid=200606261434031333

嗯嗯，该发贴了灌水

秀QQ秀了啦链接地址是:qqshow-user.tencent.com/你的QQ号/10/00/00.gif 也就是说如果我的QQ号码是296359411,那么地址就是: http://qqshow-user.tencent.com/296359411/10/00/00.gif 把按照上面的格式输入自己QQ号的链接地址放在图片链接栏里,就可以了:) 会了吗?呵呵,来SHOW一下吧!

珠中好还是附中好？？？

欢迎光临我的音乐主页~hoho~ http://www.13888.net/person/index.aspx?id=4242457为了提高人气！是朋友就帮个忙嘛那个点变成13888变成163888拜托啦

收集口头禅！嗯嗯

为什么把163888的网址禁止为广告帖？我有几首翻唱想跟朋友们分享都不行

我自己做的gif哦[来捧场啊!!]不断更新风之谷的

看过木叶运动会吗？我觉得超搞笑！虽然只有10分中，我已经被笑死了~找不到厕所的鸣人真可怜~

草莓的图啊！ TV版的哦~

小唯怎么样我觉得她~很怕狗（找不到别的词了）

咪路、姆路还有亚西吉的声优居然是女生咪路、姆路我还相信，亚西吉真的听不出来是女生配音的~

垃圾 1:2.22:2.233:4.204:4.75:9.106:7.27:5.288:6.39:4.1310:5.111:6.812:6.2213:9.2314:10.1315:9.1016:4.217:8.2018:11.2019:8.1020:3.2021:4.2522:11.2023:10.1324:2.1525:2.926:7.1527:9.1028:12.2829:11.2930:12.2431:11.1432:5.2533:12.2934:6.1835:3.2436:3.1837:10.2438:2.2839:11.1640:7.1541:11.1442:6.443:11.2844:10.2845:8.146:3.2147:5.2748:5.7(05年）49:6.1150:??51:4.652:9.2553:7.2454:6.5

载图~载图~~快来啊！有些挺稀有的！