S=1/3+1/4+1/5+......+1/n+2 Hãy chạy chương trình với các bộ dữ liệu(trong pasca) n=9,n=20,n=50
2 câu trả lời
Program baitap;
Uses crt;
Var S:real;
n,i:longint;
Begin
Clrscr;
S:=0;
Write('Nhap n:'); Readln(n);
For i:=1 to n do S:=S+1/(i+2);
Writeln('S=',S:5:1);
Readln
End.
____________________________
Hình 1: n=9
Hình 2: n=20
Hình 3: n=50
program C1;
uses crt;
var n,i:integer;
S:real;
Begin
clrscr;
write('n = ');readln(n);
for i:=1 to n do S:=s+1/(i+2);
write('S = ',s:2:2);
readln
End.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
