viết chương trình tính tổng: T =$\frac{4}{5}$ +$\frac{5}{6}$+… $\frac{98}{99}$ +$\frac{99}{100}$ Để viết chương trình tính tổng T. Ta có thể sử dụn

viết chương trình tính tổng:
T =$\frac{4}{5}$ +$\frac{5}{6}$+… $\frac{98}{99}$ +$\frac{99}{100}$
Để viết chương trình tính tổng T. Ta có thể sử dụng lệnh lặp với số lần lặp cho trước for…….do

0 bình luận về “viết chương trình tính tổng: T =$\frac{4}{5}$ +$\frac{5}{6}$+… $\frac{98}{99}$ +$\frac{99}{100}$ Để viết chương trình tính tổng T. Ta có thể sử dụn”

  1. program oken;
    uses crt;
    var i: integer;
        s: real;
    begin
        clrscr;
        s:=0;
        for i:=4 to 99 do
            s:=s + i/(i+1);
        writeln(‘Tong S: ‘,s:0:3);
        readln;
    end.

    Bình luận
  2. Program Hotboy;

    Uses crt;

    Var i: byte; 

        s: real;

    Begin

    Clrscr;

    S:=0;

    For i:=4 to 99 do

    S:=S+i/(i+1);

    Write(‘Tong T can tim la’,S:3:6);

    Readln

    End.

    Bình luận

Viết một bình luận