我今年才14岁哦,编了这个QQ炸弹,现在拿出来和大家分享~!原程序: Program QQzhandan; Var f1:text; fn1:string; i,k:word; BEGIN{Main} Write('Please Input:') read(k); {输入要生成的文件数量} For i:=1 to k do Begin {开始生成文件循环} Str(i,fn1); fn1:=fn1+'.rar'; {以此改变文件的文件名 以免因为名字相同而覆盖原来的文件} Assign(f1,fn1); rewrite(f1); {生成文件} Close(f1); end; END.想不到这个文件这么短吧.打开EXE文件,输入数量,全选后就用QQ发吧~! 我的QQ:416179394

ding

看不懂~

..

至于骄傲 吗 你那样几年 破坏一台 啊 我也回呀

鄙视中12岁比你强~

鄙视！！！！

你那 东西 有不占内存 有什么用

强烈鄙视你哦!!乡里别!!!沟里娃哦!!没见过世面哦!

LZ也不感到羞耻,就这程序,刚学会文件输入输出的人也能编的出来,而且Write('Please Input:')后漏了个句号都不知道

垃圾得很哦！无聊的东西啊

挺好的 我支持你 加油!!!!!

挺好的 我支持你 加油!!!!!

支持

的确好帖子，推荐加精华

叼你！！！

how to play?

还不如文件生成后写进一大堆废物，用一个for好嘞，循环变量用longint，天哪，一个文件生成就非常大，，这我自己也想到过。哈哈一个恶意程序￥

楼住，小小年纪，不要太狂了。这编的这个东西一点技术含量都没有。懂点Pascal的都会这！

现在QQ限制15个文件。有用么？