October 31st, 2005 by 张磊
Code:
program Project2;{$APPTYPE CONSOLE}
uses
SysUtils;
var
a,b,c,d : Integer ; //declare variables
begin
write(‘请输入一个自然数’) ;
readln(a);
for b:=1 to a do //start from the first row
begin
for c:=1 to a-b do //write blanks before numbers
write(#32) ;
for d:=1 to b do //write numbers
write(d);
for d:=b-1 downto 1 do
write(d);
for c:=1 to a-b do //write blanks after numbers
write(#32); //turn to the next row
write(#10#13) ;
end ;
{ TODO -oUser -cConsole Main : Insert code here }
writeln(‘输入回车结束’);
readln;
end.
October 29th, 2005 by 张磊
前几天好像是见鬼了，我的blog每天有10000多的访问……当然是看blog自己的记录。最多的一天达到17000。我当然不信会有这么多人每天来访，keso的blog有这样的访问量我还信。
那就只有一个可能，blog也会发春。这几天我过得正好，blog也跟着想爽一把。而且我发现最近网上搜索“张磊”的人特多，而且我的blog还在google和baidu的第一页，于是就都被带到了我这里，呵呵呵呵呵呵呵……
我的blog发春了。拍掌……
October 29th, 2005 by 张磊
我在buyren已经拿过100元钱了，马上两篇征文评选结束，就又可以申请支付了。记得上次我和智勇聊天，那时刚刚有一批订单审批完毕，他便问我：“你得了多少返点？”我毫不犹豫地说：“0……”
说来惭愧，自己在buyren上的财富值，算一算只有最初的14块是通过返点来的。其他的钱从哪里来我说不清楚了，反正我来钱的手段很多。智勇办的活动我几乎每个都参加，可是现在想想，这样真的很好吗？好像斑竹里面就我一个是这样的。
想到这里没来由地觉得自己对不起智勇，我希望自己以后可以多帮智勇做一些事情，这样的话，心里也可以宽慰一些。
这一段事情太多了，连学php都腾不出手来。
October 25th, 2005 by 张磊
今天收到了馒头寄来的《实用软件工程》。啊，爱死馒头了……
www.zlck.com
October 25th, 2005 by 张磊
Code:
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils;
var a,b,c : Integer;
begin
{ TODO -oUser -cConsole Main : Insert code here }
write (‘Please input a:’);
readln (a);
write (‘Please input b:’);
readln (b);
c:=a-b ;
writeln (‘a-b=’,c) ;
readln;
end.
同时恭喜自己荣升课代表……
October 22nd, 2005 by 张磊
Code:
#include <stdio.h>
#include <math.h>
main ()
{
int a,b,result,yue;
printf ("please input two numbers \n")
scanf ("%d,%d",&a,&b);
yue=yue(a,b);
result=a*b/yue;
printf ("the result is %d \n",result);
}
yue (int x,int y) /*求最大公约数的子函数*/
{
int a
while (x%a!=0||y%a!=0) /*辗转相减法*/
{
if x>y
{
a=x-y;
x=a;
}
else
{
a=y-x;
y=a;
}
}
return (a);
}
********************************************************
没有电脑，连调试的机会也没有
October 22nd, 2005 by 张磊
暑假的时候我自学了VB.net，当然没学成什么样子，但已经有了一个框架了。然后就到了杭电，没想到学的居然是delphi。而我看着学校办的ACM程序设计大赛的大奖眼红，又去借了C/C++来看。
进了社团联合会，网站要重写，服务器只支持asp，只好去借来一本asp的教程。可是我还是倾向于php，智勇也说还是php好一点。我又毫不犹豫地借来了php的教程。我想学成以后，到一个朋友那里做技术，so，努力吧。
昨天下午去了一次图书馆，看到一本《software engneering》(软件工程)，翻翻看，全是英文。好吧，男人，就要对自己狠一点，于是，那本书被借在了我的名下。
我的blog订阅下来总有<br>，现在我都没弄明白究竟是怎么回事。也许是这套系统的小问题，我相信，等寒假的时候，我应该可以解决了。头大，这么多东西，不过有一种很充实的感觉。
October 22nd, 2005 by 张磊
昨天给GF打电话的时候，她哭得很厉害。我问她怎么了，她哭着说：“我以后再也不给你寄东西了，再也不去邮局了！”我知道，一定又是学校对面的邮局。
那个邮局态度的恶劣是出了名的，但四下里就那么一个投递点，寄东西还都得到那里去。GF为我准备了很久，然后每天都要把新的东西整理起来放进那个箱子。最后，她还要在北方的秋寒里，一个人把一个大大的箱子搬到那边。
而那边的女人们可不管这么多，把她整理好的东西一件件的翻出来，看不顺眼就放在地上摔。有一支口香糖，不让寄出来，原因居然是放在箱子里摇起来会响。最后GF封箱子，封好就被扔出来重做，反反复复弄了好多次。终于让人家满意了，人家还不忘了说一句，你看看你拿的是什么箱子……。可气的是，那个贱女人还指着GF的鼻子说，一看这就是个男生的地址，你一个小女生寄这么多给他干嘛，小小年纪就不干好事……
好，贱女人，你有种，希望我下次回去不会遇见你值班。你知道那是一个女孩半个月来的心血吗？就算你无知，也不必这样没有修养摔别人的东西吧。箱子会响就不让寄了，卓越网每次给我寄来的东西都能摇出声音，你一个小小的营业点，比卓越还牛是吧？她有男朋友怎么了，她给男朋友寄东西怎么了？她每次考试都在年级前三，如果你的女儿有这样的本事，我断定她不是你老公跟你生的。你太贱了，我都无法形容对你的鄙视。
GF说，磊，我担心我寄去的东西你不喜欢，因为那不是我要给你的东西，我的东西被他们弄乱了……我整颗心都碎了，因为她已经泣不成声。我说，萍儿，我一定会喜欢的，只要是你的东西，我一定会喜欢的……我恨极了那个贱女人，也恨极了中国邮政。
中国邮政，你还有什么脸做下去？这件小事比起当年邮局把800万封信件当废纸卖掉，可能太微不足道了。但是你知道它在一个女生的心中留下怎样的阴影吗？你也许会说，中国邮政不是这个样子，那它是什么样子呢？我只相信我所看到的。这样的一个企业，已成为百足之虫，想动一动都很难。而里面的员工，不再有什么修养也不再有什么素质，卑劣地靠着这只大虫活着。你怎么做？我想你很快会丢掉做的资本，我相信正在崛起的快递公司会很快把你淹没，我很乐意看到你的倒闭。
至于那个贱女人，最好别让我找到你。不是看不起你，而是你真的不配批评我的GF，你没那个资格也没那个地位。GF家在北京的一套房子是你十辈子赚的钱也买不来的，只是为了我，她才受你那样的气，别以为你自己多NB。
October 15th, 2005 by 张磊
在进入学校的社团联合会之前，我其实不知道社联的职责。我原本以为它是个普通的社团，但是没想到，所有的社团都归社联管。
今天是一年一度的社团招新，整整一天我们都在活动中心前面的广场忙碌着。我没有午休。
工作真的太累了，但我们都还年轻。今天我搬了好多东西，很吃力，却很充实。好多次我闲着的时候，就会严重感觉到生命的空虚，直至心痛——我们谁都没有权利浪费光阴，但都苦于没有办法去充实自己。一切的一切慢慢变成不可挽回的失去，什么是生命，什么是存在，什么又是属于……
无数次告诫自己要做一个合格的男孩，每一个男性都应当勇于承担更多的使命。社会需要我们去推动，所以我们都需要更多的历练和积淀……我很累，但是好充实，这种感觉很美妙——我的力量，可以贡献给我所在的世界的人。
October 14th, 2005 by 张磊
每次上网都要上buyren，我注意到自己的贡献之已经涨到85了。呵，首先排除的可能是智勇在后台给我加了贡献值。也就是说，应该是通过友情连接加的吧……
能给智勇带来一定的流量，我很高兴呵。
末了，又想起一件事情来，得把资料仓库的连接加上。
