pascal做1-1/3+1/5-1/7.前100项的和急,用for语句做,直接要答案.
来源:学生作业学帮网 编辑:学帮网 时间:2024/06/05 02:28:06
pascal做1-1/3+1/5-1/7.前100项的和
急,用for语句做,直接要答案.
Program seq;
Var tmp: Double ;
Begin
tmp := 1.0;
For i:=1 to 99 do
tmp := tmp + 1.0/(2*i+1)*(((i+1) mod 2)-(i mod 2));
Writeln( "Resault = ", (tmp) );
Readln;
End.
//----------------------------
// 1 - 1/3 + 1/5 - 1/7 ...
//----------------------------
//输出结果:
//Resault = 0.78289822588964
//----------------------------
Program seq;
Var tmp: Double ;
Begin
tmp := -1.0;
For i:=1 to 99 do
tmp := tmp + 1.0/(2*i+1);
Writeln( "Resault = ", (-tmp) );
Readln;
End.
//----------------------------
// 1 - 1/3 - 1/5 - 1/7 ...
//----------------------------
//输出结果:
//Resault = -1.2843421893016
//----------------------------
pascal 输入n(1
pascal 输入n(1
pascal编程求1+3+5+...+n一定要是自己是过的,要用pascal!
pascal编程输出图形 7 6 5 8 1 4 9 2 3 10 11
pascal做1-1/3+1/5-1/7.前100项的和急,用for语句做,直接要答案.
Pascal语言某自然数N(1
Pascal二分法:输入一个正整数n(1
pascal For i:=1 to n
给出这样一个数列:1 1 2 3 5 8 13 21 34 55 89...问这个数列的第n项是什么 用pascal做
01穷举做Pascal NOIP2002普及组第二题已知n(1
pascal语言编程问题(free pascal求1—N中的素数的个数.(1
pascal编程s=1+2/1+3/1+4/1+5/1.+100/1
用pascal求s=1-2+3-4+5-6+7-8+...+99-100的值
1 2 3 5 8 13 21 34 55 89 求通项公式(pascal语句)
计算S=1+3+5……+97+99 pascal
打印下列图形!用pascal做!6、 1 2 4 7 11 16 223 5 8 12 17 236 9 13 18 2410 14 19 2515 20 2621 2728用pascal打印出来!别只给我个打印!要做!
打印下列图形成 用PASCAL做7、 1 2 3 4 5 16 17 18 19 6 15 24 25 20 7 14 23 22 21 8 13 12 11 10 9
几道pascal题目!题目在http://pan.baidu.com/s/1c0GMMCo 文档里就有只要做1~3题就可以了~谢谢!