/upfile/200442374238775.swf引力（解说词）
引力，将我们留在地球上，将水和大气留在地球上，也将地球留在太阳身边。是引力造就了我们的存在。然而，也许你还不知道，引力不仅可以使宇宙中的尘埃凝聚成星球，它还可以将星球支解成尘埃。
以人造地球卫星为例，根据物理规律，卫星的公转周期必须由它的高度决定：离地球越近的卫星、周期越短，反之周期就越长。它们是不可能同步的，将几颗卫星绑在一起是很荒谬的。然而，如果我们试图制造一颗非常大的卫星，那么这颗巨大的卫星，...
引力，将我们留在地球上，将水和大气留在地球上，也将地球留在太阳身边。是引力造就了我们的存在。然而，也许你还不知道，引力不仅可以使宇宙中的尘埃凝聚成星球，它还可以将星球支解成尘埃。
以人造地球卫星为例，根据物理规律，卫星的公转周期必须由它的高度决定：离地球越近的卫星、周期越短，反之周期就越长。它们是不可能同步的，将几颗卫星绑在一起是很荒谬的。然而，如果我们试图制造一颗非常大的卫星，那么这颗巨大的卫星，...
[ 查看全文 ]
公元2003年春，“FeiDian”开始在Z国G市漫延，既而发展到S市、B市等。
到2003年4月底，Z国已有超过2千人受FeiDian感染，并仍在迅速漫延。
5月份，FeiDian病毒已经产生一百多种变异，这些变异具有更快的传染速度，这种变异只感染人类不感染其它动物，没有哪个人有抗体。
到2003年5月底，Z国B市受感染人数超过三分之一，一部分市民开始外出逃难。这样的逃难将FeiDian病毒带到了更多的地方。
6月，B市被封，所有...
到2003年4月底，Z国已有超过2千人受FeiDian感染，并仍在迅速漫延。
5月份，FeiDian病毒已经产生一百多种变异，这些变异具有更快的传染速度，这种变异只感染人类不感染其它动物，没有哪个人有抗体。
到2003年5月底，Z国B市受感染人数超过三分之一，一部分市民开始外出逃难。这样的逃难将FeiDian病毒带到了更多的地方。
6月，B市被封，所有...
[ 查看全文 ]
本来今天没空看新闻的，不过午饭吃得太热，回家去冲个澡。顺便看了一下电视。
十二点钟，中央一台、四台同时开始新闻节目。我先看一下四台的新闻提要，然后切换到一台，这时一台的套装广告刚结束，也可以看到内容提要。然后我就可以估计好时间挑我要的新闻了。
就是在这样的情况下看到了中央一台的关于网络游戏的新闻。画面是圆的，大概又是将摄像机放在挎包里偷拍的。画面的背景是网吧，先是对着《反恐精英》拍了一段，说这个游戏“充满了血腥凶杀镜头”、“令人...
十二点钟，中央一台、四台同时开始新闻节目。我先看一下四台的新闻提要，然后切换到一台，这时一台的套装广告刚结束，也可以看到内容提要。然后我就可以估计好时间挑我要的新闻了。
就是在这样的情况下看到了中央一台的关于网络游戏的新闻。画面是圆的，大概又是将摄像机放在挎包里偷拍的。画面的背景是网吧，先是对着《反恐精英》拍了一段，说这个游戏“充满了血腥凶杀镜头”、“令人...
[ 查看全文 ]
/upfile/20044231141247.swf先做背景 1、建立一个动画，设为500*100，25帧/秒
2、画一个圆，大小随意（因为最后可以放大缩小），在“信息”面板中设置圆中心位置的坐标为(0,0)...
2、画一个圆，大小随意（因为最后可以放大缩小），在“信息”面板中设置圆中心位置的坐标为(0,0)...[ 查看全文 ]
其一：何为忠实原著？——由大家对射雕的讨论想到的
央视《射雕英雄传》出来后，网络上一片热闹景象。或褒或贬，说演技、说意境、说场面、还说韵味。
83版也好，03版也好，本人不想对其作任何评价，对于大家的评论，本人只看不谈。我只相信一点：两部相差二十年的电视不能摆到一块儿去比较，硬要比较的话，对谁都不公平。
那些唾骂央视射雕的人也不用太过于激烈。如果不是83版的射雕正好在你们村买电视机的时候公映（不管是早一点还是晚一点），你会记得如此...
央视《射雕英雄传》出来后，网络上一片热闹景象。或褒或贬，说演技、说意境、说场面、还说韵味。
83版也好，03版也好，本人不想对其作任何评价，对于大家的评论，本人只看不谈。我只相信一点：两部相差二十年的电视不能摆到一块儿去比较，硬要比较的话，对谁都不公平。
那些唾骂央视射雕的人也不用太过于激烈。如果不是83版的射雕正好在你们村买电视机的时候公映（不管是早一点还是晚一点），你会记得如此...
[ 查看全文 ]
/upfile/200442375931448.swf 本来不想做这方面的教程，前阵子在网上乱转，发现有很多人还没有入门，在各大网站上提问“这个怎么做的，那个效果怎么做的”。于是很想帮帮别人，就做起来了。一、这个动画的主要功能是用一支笔来画出一个字母“E”，所以我们先来做这个工作。 1、新建电影，400*300，25帧每秒，黑色。 2、场景要有三个层，从下到上依次为“字母”、“笔”、...
[ 查看全文 ]
下载 “凡是有华人的地方就有金庸的武侠小说”，这句话绝不为过。这十五部小说部部读来脍炙人口，老少皆宜。工作学习之余，捧起被称为“成人童话”的武侠小说，真是一种享受。
有计算机的人喜欢在计算机上读书，因为不用捧在手里了。还可以调节文字的大小、...
[ 查看全文 ]
programlong;
vari,j,l,m,jinwei,benwei:integer;s:string;a,b:array[1..30]ofinteger;
c:array[1..61]ofinteger;
begin
fori:=1to30dobegina[i]:=0;b[i]:=0;end;
fori:=1to61dobeginc[i]:=0;end;
r...
vari,j,l,m,jinwei,benwei:integer;s:string;a,b:array[1..30]ofinteger;
c:array[1..61]ofinteger;
begin
fori:=1to30dobegina[i]:=0;b[i]:=0;end;
fori:=1to61dobeginc[i]:=0;end;
r...
[ 查看全文 ]
programstr(input,output);
var
str1,str2,str3:packedarray[1..20]ofchar;
i,he,jinwei:integer;
begin
fori:=1to20doread(str1[i]);
fori:=1to20doread(str2[i]);
fori:=20downto1do
...
var
str1,str2,str3:packedarray[1..20]ofchar;
i,he,jinwei:integer;
begin
fori:=1to20doread(str1[i]);
fori:=1to20doread(str2[i]);
fori:=20downto1do
...
[ 查看全文 ]
programbtod2;
var
b:string;
str1:char;
i,p,leftofdot,rightofdot:integer;dot:boolean;
a1,a2:array[1..20]ofinteger;
d,y:real;
begin
write('InputtheBinaryNumber:');readln(b);...
var
b:string;
str1:char;
i,p,leftofdot,rightofdot:integer;dot:boolean;
a1,a2:array[1..20]ofinteger;
d,y:real;
begin
write('InputtheBinaryNumber:');readln(b);...
[ 查看全文 ]
programbtod;
var
b:string;
str1:char;
d,i,y,l:integer;
a:array[1..20]ofinteger;
begin
write('InputtheBinaryNumber:');readln(b);
l:=length(b);
fori:=1toldo
...
var
b:string;
str1:char;
d,i,y,l:integer;
a:array[1..20]ofinteger;
begin
write('InputtheBinaryNumber:');readln(b);
l:=length(b);
fori:=1toldo
...
[ 查看全文 ]
长江、黄河、长城一应俱全，台湾、海南、崇明应有尽有。南京、此京、沈阳等七大军区外加台湾省，八个军团。是一部当今的“八国志”。下载...
[ 查看全文 ]
programDtoB;
var
a,n:real;
s1,s2:string[20];p:string;
i,j,m,t:integer;
begin
readln(a);
m:=trunc(a);
n:=a-trunc(a); i:=0;
repeat
i:=i+1...
var
a,n:real;
s1,s2:string[20];p:string;
i,j,m,t:integer;
begin
readln(a);
m:=trunc(a);
n:=a-trunc(a); i:=0;
repeat
i:=i+1...
[ 查看全文 ]
programcouqian;
var
i,j,k:integer;
begin
fori:=0to1do
forj:=0to2do
begin
k:=10-5*i-2*j;
...
var
i,j,k:integer;
begin
fori:=0to1do
forj:=0to2do
begin
k:=10-5*i-2*j;
...
[ 查看全文 ]
programxunshu;
var
m,n,i,p:integer;
begin
read(m,n);
p:=0;
fori:=m+1ton-1do
if(imodm=0)and(nmodi=0)then
begin
...
var
m,n,i,p:integer;
begin
read(m,n);
p:=0;
fori:=m+1ton-1do
if(imodm=0)and(nmodi=0)then
begin
...
[ 查看全文 ]
programmp(input,output);
type
mingpian=record
name:string[20];
age:integer;
phonenumber:string[7];
end;
var
mymp:array[1..10]ofmingpian;...
type
mingpian=record
name:string[20];
age:integer;
phonenumber:string[7];
end;
var
mymp:array[1..10]ofmingpian;...
[ 查看全文 ]
programjilu(input,output);
type
student=record
name:string[20];
age:integer;
height:real;
weight:real;
sex:boolean;...
type
student=record
name:string[20];
age:integer;
height:real;
weight:real;
sex:boolean;...
[ 查看全文 ]
programjihe(input,output);
type
shuji=setof1..10;
var
shuji1,shuji2,shuji3:shuji;
a:integer;
begin
shuji1:=[3,4,5];
shuji2:=[6,8,4];
shuji3:=shuji1+shuji2;
re...
type
shuji=setof1..10;
var
shuji1,shuji2,shuji3:shuji;
a:integer;
begin
shuji1:=[3,4,5];
shuji2:=[6,8,4];
shuji3:=shuji1+shuji2;
re...
[ 查看全文 ]
programabc(input,output);
vara:integer;
b:longint;
functionfuc(x:integer):longint;
begin
if(x=2)
then
...
vara:integer;
b:longint;
functionfuc(x:integer):longint;
begin
if(x=2)
then
...
[ 查看全文 ]
programabc(input,output);
vara:integer;
b:real;
functionfuc(x:integer):real;
begin
if(x<=2)
then
...
vara:integer;
b:real;
functionfuc(x:integer):real;
begin
if(x<=2)
then
...
[ 查看全文 ]
programshulie(input,output);
vara,b,i:integer;
procedureshuchu(x,y:integer);
vari,j:integer;
begin
fori:=1toxdo
begin
forj:=1...
vara,b,i:integer;
procedureshuchu(x,y:integer);
vari,j:integer;
begin
fori:=1toxdo
begin
forj:=1...
[ 查看全文 ]
programjc(input,output);
var
a,b:integer;
functionjiecheng(x:integer):integer;
vari,y:integer;
begin
if(x=0)or(x=1)
theny:=1
...
var
a,b:integer;
functionjiecheng(x:integer):integer;
vari,y:integer;
begin
if(x=0)or(x=1)
theny:=1
...
[ 查看全文 ]
programChengFang(input,output);
var
a,b:integer;functionlifang(x:integer):integer;
var
i:integer;
jieguo:integer;
begin
jieguo:=1;
fori:=1to3do...
var
a,b:integer;functionlifang(x:integer):integer;
var
i:integer;
jieguo:integer;
begin
jieguo:=1;
fori:=1to3do...
[ 查看全文 ]
programJianSuo(input,output);
var
s:array[1..100]ofinteger;
i,a:integer;
begin
fori:=1to100dos[i]:=i;
write('Inputanumber:');
read(a);{ThenumbertobefindinArray} i:=0;
re...
var
s:array[1..100]ofinteger;
i,a:integer;
begin
fori:=1to100dos[i]:=i;
write('Inputanumber:');
read(a);{ThenumbertobefindinArray} i:=0;
re...
[ 查看全文 ]
“昔日才子点佳人，今朝秋香戏伯虎。”《秋香》从另一个角度来刻画才子佳人，这倒有点看头。一看呀，不得了了，发现此剧编得、拍得都不错。
前阵子先是“小燕子”满屏飞、家家户户传出“有一个姑娘”；接着又来个“废物四”，处处皆是那狗P不通的“流星雨落在地球上”，难道你是火星人？到了前不久，听出《河东狮吼》刚出来，心想“张柏芝并不是花瓶，此剧想必还有看头...
前阵子先是“小燕子”满屏飞、家家户户传出“有一个姑娘”；接着又来个“废物四”，处处皆是那狗P不通的“流星雨落在地球上”，难道你是火星人？到了前不久，听出《河东狮吼》刚出来，心想“张柏芝并不是花瓶，此剧想必还有看头...
[ 查看全文 ]
programyanghui(input,output);
var
x:array[1..10,1..10]ofinteger;
i,j:integer;
begin
x[1,1]:=1;x[2,1]:=1;x[2,2]:=1;
writeln(1:4);
writeln(1:4,1:4);
fori:=3to10do
...
var
x:array[1..10,1..10]ofinteger;
i,j:integer;
begin
x[1,1]:=1;x[2,1]:=1;x[2,2]:=1;
writeln(1:4);
writeln(1:4,1:4);
fori:=3to10do
...
[ 查看全文 ]
那还是大学一年级结束的那个夏天。放暑假刚回家几天，母亲就抓了一只小猫回来。
小猫很漂亮，毛比天上的彩霞还鲜艳，也很可怜，还没我的手掌心大。放在地上只能倦作一团，站都站不稳。母亲告诉我，这猫是从芹伯家废弃的房子里抓来的。芹伯家的旧房子是我小时候捉迷藏的最佳场所，尖顶的大瓦房，有一层阁楼，早不住人了，满屋子都堆的是稻草麦杆。我小的时候，经常和小伙伴在那儿可以爬上爬下，那旧房子成了我们的游乐场。
母亲把猫放在地上就忙去了，四岁的侄女忙过来玩弄，一边有手抚摸还一边...
小猫很漂亮，毛比天上的彩霞还鲜艳，也很可怜，还没我的手掌心大。放在地上只能倦作一团，站都站不稳。母亲告诉我，这猫是从芹伯家废弃的房子里抓来的。芹伯家的旧房子是我小时候捉迷藏的最佳场所，尖顶的大瓦房，有一层阁楼，早不住人了，满屋子都堆的是稻草麦杆。我小的时候，经常和小伙伴在那儿可以爬上爬下，那旧房子成了我们的游乐场。
母亲把猫放在地上就忙去了，四岁的侄女忙过来玩弄，一边有手抚摸还一边...
[ 查看全文 ]
programshuzu(input,output);
{Faibonacci}
var
x:array[1..20]ofinteger;
i:integer;
begin
x[1]:=0;x[2]:=1;
writeln(x[1]);writeln(x[2]);
fori:=3to20do
begin...
{Faibonacci}
var
x:array[1..20]ofinteger;
i:integer;
begin
x[1]:=0;x[2]:=1;
writeln(x[1]);writeln(x[2]);
fori:=3to20do
begin...
[ 查看全文 ]
早就知道魔兽争霸III已经出来了，一直想买一个来玩玩，昨天才如愿了。我打即时战略游戏就是从《魔兽争霸II》开始的。（那时打厌了RPG游戏《仙剑奇侠传》，打起了另一种游戏。也正是因为习惯了《魔兽争霸》，才一直嫌《红色警戒》太简单。）
昨天上午买了光盘，昨天晚上玩了几小时，今天又打了一仗，并且保存为录相看了两遍。心里才对它有了点印像。现把它写下来，可能有的朋友早就玩烂了，在此贻笑大方了。
一、3D
《魔兽争霸III》给人最大的感觉是它的3D效果。而3D效果又...
昨天上午买了光盘，昨天晚上玩了几小时，今天又打了一仗，并且保存为录相看了两遍。心里才对它有了点印像。现把它写下来，可能有的朋友早就玩烂了，在此贻笑大方了。
一、3D
《魔兽争霸III》给人最大的感觉是它的3D效果。而3D效果又...
[ 查看全文 ]
programMeiJu(input,output);
type
daytype=(sun,mon,tue,wed,thu,fri,sat);
var
today,tomorrow:daytype;
d,mmmm,dddd:integer;
begin
write('Pleaseinputmonth,day:');
read(mmmm,dddd);...
type
daytype=(sun,mon,tue,wed,thu,fri,sat);
var
today,tomorrow:daytype;
d,mmmm,dddd:integer;
begin
write('Pleaseinputmonth,day:');
read(mmmm,dddd);...
[ 查看全文 ]