pascal做1-1/3+1/5-1/7.前100项的和

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/11/12 03:57:00

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的niven数这道题怎么做!1 有一分数序列:2/1,3/2,5/3,8/5,13/8,21/13...求出这个数列的前20项之和（用pascal解题） pascal 0/1背包和完全背包的差别? 给出这样一个数列：1 1 2 3 5 8 13 21 34 55 89...问这个数列的第n项是什么用pascal做计算1—1000之间能同时被3和5整除的整数的和.pascal语言计算1*2*3*.*n>1000的第一个n值（用pascal语言,while循环和repeat循环来做） 3n+1问题pascal解答 3n+1问题 pascal语言 PASCAL程序全1数字计算式子的值：s=1+2+3+...+100（编程 pascal语言 for语句） pascal 循环结构计算1+2+3+4.+n之和、奇数和与偶数和. free pascal用 while 语句计算1—1000之间能同时被3和5整除的整数的和