Bài 5 trang 51 sgk Tin học 11

Giải bài tập Tin học 11 trang 50, 51

Bài 5 (trang 51 sgk Tin học lớp 11):

Trả lời:

b)

program bai5;
uses crt;
var n:integer;
    y:real;
begin
	clrscr;
	y:=0;
	for n:=1 to 50 do
	y:=y+n/(n+1);
	writeln('y=',y:8:4);
	readln;
end.

Kết quả:

b)

program bai5;
uses crt;
var n,dem:integer;
    e:real;
    gt:longint;
begin
	clrscr;
	e:=1;
	gt:=1;
	dem:=1;
	while 1.0/gt >2*0.000001 do
	begin
	e:=e+1.0/gt;
	gt:=gt*dem;
	dem:=dem+1;
	end;
	writeln('e=',e:8:4);
	readln;
end.

Kết quả:

Các bài giải bài tập và trả lời câu hỏi Tin học 11 Chương 3