4-1：编写程序计算下列式子的值：1+2
+3
+……+9+10
4-2：编写程序计算下列式子的值：1+1/3+1/5+……+1/99
4-3：编写程序计算下列式子的值：1+3+5+……+97+99
4-4：根据公式计算圆周率pai的值，n从键盘输入；
π²/6=1+1/2²+1/3²+1/4²+……+1+n²
4-5：编写程序在屏幕上打印出如下图形；
*****
***
*
4-6：一队兔子，每个月可以生一队兔子，而小兔子一个月以后也可以生一对兔子，即第一个月1对，第二个月2对，第三个月3对，第四个月5对，假设兔子的生育期是12个月，并且不死，请问一年以后有多少对活着的后代？

@courage17340 @82111668_2012 @309384967 @辰辰战马 @canadaottawa

QAQ @4399flash @非正常的疯子 @mxalbert1996 @开水eVE @三更斜阳

这个用for吧

第三个，for i:=1 to 50 do s:=s+2*i-1;

第五个，for i:=3 downto 1 do begin for j:=(i*2-1) downto 1do write('＊') ;writeln;

第一个从一到十加起来不就行了，这么难。

4-1：编写程序计算下列式子的值：1+2+3+……+9+10
program p4_1(input,output);
var total,i:integer;
begin
total:=0;
for i:= 1 to 10 do total:=total+i;
writeln(total);
readln();
end.
4-2：编写程序计算下列式子的值：1+1/3+1/5+……+1/99
program p4_2(input,output);
var total:real;i:integer;
begin
total:=0;
for i:= 0 to 49 do total:=total+1/(2*i+1);
writeln(total);
readln();
end.
4-3：编写程序计算下列式子的值：1+3+5+……+97+99
program p4_3input,output);
var total:real;i:integer;
begin
total:=0;
for i:= 0 to 49 do total:=total+2*i+1;
writeln(total);
readln();
end.
4-4：根据公式计算圆周率pai的值，n从键盘输入；
π²/6=1+1/2²+1/3²+1/4²+……+1+n²
program p4_4(input,output);
var pi:real;i,n:integer;
begin
pi:=0;
readln(n);
for i:= 1 to n do pi:=pi+1/sqr(i);
pi:=pi*6;
writeln(pi);
readln();
end.
4-5：编写程序在屏幕上打印出如下图形；
*****
***
*
program p4_5(input,output);
var i,j:integer;;
begin
for i:=3 downto 1 do
begin
for j:=1 to i*2-1 do write('*');
writeln;
end;
readln;
end.
4-6：一队兔子，每个月可以生一队兔子，而小兔子一个月以后也可以生一对兔子，即第一个月1对，第二个月2对，第三个月3对，第四个月5对，假设兔子的生育期是12个月，并且不死，请问一年以后有多少对活着的后代？
program p4_6(input,output);
var a,b,c:longint;i:byte;
begin
a:=1;
b:=2;
for i:=3 to 12 do
begin
c:=a+b;
a:=b;
b:=c;
end;
writeln(b);
readln();
end.
还有疑问，请继续at我。
感谢您对我的信任与支持。

。。。。。。。。。。。好简单。。。。。。

. 秘籍。老师憋了半天语重心长告诉我：”你每到一个帖子就粘贴这句话，十五天就到了11级”...我彻底恍然大悟！吧主再也不用担心我的经验了。我是路过的，我什么都不知道，不过我已经精秃了，假如你每天签到拿4经验，18级300000/4=75000天，如果从1岁开始签到，那100年=36500天，你差不多要活200年保持每天签到（谁知道200年后还有没有签到这玩意），如果你每天再水4经验，时间减半，但考虑现实，你不可能再活100年，取50年吧，你就要每天水16经验，可能你是个勤快的人，每天水32经验，那就需要25年！！！再如果你是个大水怪，每天水64经验，那就只要12.5年！！！还如果你个心急的人，每天水128经验，你只要6.25年！！！！假如你已经急不可耐了，每天水256经验，那你碉堡了，只要3.125年！！！当然，你会觉得3年还是太远了，每天你闲的蛋疼，忙忙碌碌的水512经验，碉堡了，你只需要1.5625年，只比1年半多一点！！！什么！！你还不满意，那你觉得你可能一天水1024经验吗，可能吗！！可能吗！！！据说回复100字或者一百字以上可以得到11~30经验，真的很棒。。。。那么，按照队形，点击复制，把我的话复制一片，拿经验妥妥的秘籍。老师憋了半天语重心长告诉我：”你每到一个帖子就粘贴这句话，十五天就到了11级”