Trang chủ

Tin học lớp 11, giải bài tập tin học lớp 11 - Để học tốt tin học 11

Câu 5 trang 51 SGK Tin học 11

Lập trình tính:

Đề bài

Lập trình tính:

Lời giải chi tiết

a) program Tong_5a,

uses crt,

var y: real;

n: byte;

Begin

clrscr

y : 0;

for n :=1 to 50 do

y : = y + n / ( n +1 ) ;

writeln('Tong y la: y:0:18);

readln ;

End.

Nếu biến y khai báo theo kiểu extended thì chương trình tính tổng y sẽ là như sau:

($e+, N+}

program Tong_5a;

uses crt;

var y: real;

n :byte;

Begin clrscr;

y : = 0 ;

for n:= 1 to 50 do

y:= y + n/(n+1);

writeln('Tong y la: y:0:18);

readln

End.

program Tong_5b;

uses crt;

var n: longint;

e, sh: real;

Begin

clrscr;

sh:= 1/2,

n: = 2 ;

e:= 2 + sh;

while sh>= 2*1E-16 do

begin

inc (n) ,

sh: = sh*(1/n) ,

e:= e + sh;

end;

writeln('Gia tri e(n)la: ',e:10:6);

readln

End.

HocTot.Nam.Name.Vn

Chia sẻ

Bình luận

Bình chọn:

3.9 trên 19 phiếu

Câu 4 trang 51 SGK Tin học 11
Viết câu lệnh rẽ nhánh tính:
Câu 8 trang 51 SGK Tin học 11
Một người gửi tiết kiệm không kì hạn với số tiền A đồng với lãi suất 0,2% mỗi tháng. Hỏi sau bao nhiêu tháng, người đó rút tiền thì sẽ nhận được số tiền là bao nhiêu. Biết rằng tiền gửi tiết kiệm không ki hạn không được tính cộng vào vốn.
Câu 7 trang 51 SGK Tin học 11
Nhập từ bàn phím tuổi của cha và con (tuổi của cha hơn tuổi con ít nhất là 25). Đưa ra màn hình bao nhiêu năm nữa thì tuổi cha gấp đôi tuổi con.
Câu 6 trang 51 SGK Tin học 11
Lập trình để giải bài toán cổ sau:
Câu 3 trang 51 SGK Tin học 11
Có thể dùng câu lệnh while-đo để thay cho câu lệnh for-do được không? Nếu được, hãy thực hiện điều đỏ với chương trình.

Báo lỗi - Góp ý

Câu 5 trang 51 SGK Tin học 11

Tham Gia Group Dành Cho 2K8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Góp ý

Báo lỗi góp ý

Báo lỗi