回 帖 发 新 帖 刷新版面

主题:新年好啊(请大家积极回复,一次加30,两次加50)

为了给本区增加一点人气,本人先在此向大家问声好。


[fly]HAPPY NEW  YEAR!!![/fly]

截止日期,正月十五~~~~~~挖哈哈~~~

回复列表 (共16个回复)

11 楼

Happy new year!!!!!!!!!!

12 楼

鄙视高考!!!!!!!!

13 楼

TO 楼上:
    高考的制度是有点不合理,但高考并非也一点用处都没有。它起码能证明自己的学习能力。要好好想想,为什么很多人能在高考中脱颖而出,也有很多人名落孙山?一定的付出,不一定有等量的回报;但有付出,就肯定有回报。
    现在社会上很多痛恨高考的说法传得纷纷扬扬,究其始作俑者无非是三种人:第一,为了自身饭碗,在无端炒作的教育人士;第二,高考名落孙山,成天疾呼要废除八股的考试无能者;第三,高考之前,那些心理没底,人云亦云的大众考生。
    如果你是今年的考生,我希望你是第三种,也希望你好好备考,因为我也是过来人。考后无论是阳光还是雨露,都是付出的回报。
    考试并非能力决定一切,心态在考试中占的份量也不小。希望你有一个好的开始,一个好的结局!!!

14 楼

大家新年好,同喜

15 楼

验证哥德巴赫猜想

var
a:array[1..255]of longint;
m,n,i,j,k,l,t,x:longint;s:real;
p:boolean;
procedure f;
begin
 p:=true;
 for j:=2 to trunc(sqrt(i))+1 do
  if i mod j=0 then p:=false;
  if p then
  begin
  for j:=2 to trunc(sqrt(n-i))+1 do
  if (n-i) mod j=0 then p:=false;
  if p then
  writeln(i,'+',n-i);
  end;
end;
begin
readln(n);
if n<4 then exit;
if n=4 then
begin
writeln(2+2);
exit;
end;
for i:=2 to n-2 do
f;
end.

16 楼

本来想把这个贴子留到正月十五的,可是明天上班了,来的时间也少了,今天结贴吧。大家应该不会有什么意见吧!~~~~~

我来回复

您尚未登录,请登录后再回复。点此登录或注册