Lập trình tính tổng: a) T= $\frac{1}{5}$ +$\frac{1}{6}$+… $\frac{1}{99}$ +$\frac{1}{100}$ Để viết chương trình tính tổng T. Ta có thể sử dụng lện

Question

Lập trình tính tổng:
a) T= $\frac{1}{5}$ +$\frac{1}{6}$+… $\frac{1}{99}$ +$\frac{1}{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
T:=0
For i:=5 to 100 do
T:=T + 1/i;
writeln(‘Tong cua day la’,T:5:2);

in progress 0
Thiên Di 5 years 2021-01-07T02:25:08+00:00 3 Answers 47 views 0

Answers ( )

  1. minhkhoi
    0
    2021-01-07T02:27:04+00:00
    Reply

    Program ct;

    Uses crt;

    Var T,i,n:integer;

    Begin

    Clrscr;

    Write(‘nhap so bat ki:’);readln(n);

    T:=0;

    For i:=5 to 100 do T:=T+1/n;

    Writeln(‘tong la:’,T:3);

    Readln

    End.

  2. MichaelMet
    0
    2021-01-07T02:27:06+00:00
    Reply

    Program tinh_tong;

    Uses crt;

    Var i: byte;

           T: real;

    Begin

    T:=0;

    For i:= 5 to 100 do 

    T:= T+ 1/i;

    Writeln (‘Tong cua day la:’,T:5:2);

    Readln

    End.

  3. trungdung22
    0
    2021-01-07T02:27:15+00:00
    Reply

    Để tìm câu trả lời chính xác các em hãy tham khảo frac là gì các nguồn hoc24.vn, lazi.vn, hoidap247.com để thầy cô và các chuyên gia hỗ trợ các em nhé!

Leave an answer

Browse

Giải phương trình 1 ẩn: x + 2 - 2(x + 1) = -x . Hỏi x = ? ( )