lap voi so lan chua biet truoc

... real; n: integer; const sai _so= 0.003; begin clrscr; x:=1; n:=1; while x>=sai _so do begin n:=n+1; x:=1/n end; writeln(&apos ;So n nho nhat de 1/n < ',sai _so: 5:4, 'la ',n); ... có dạng: while <điều kiện> do <câu lệnh>; trong đó: - điều kiện thường là một phép so sánh; - câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép. Câu lệnh lặp này được thực h...

Ngày tải lên: 20/07/2013, 01:26

... kiện sai _so = 0.003 thành 0.002 ; 0.001 ; 0.005 ; ... -Thực hiện - Thực hiện const sai _so= 0.003; begin clrscr; x:=1; n:=1; while x>=sai _so do begin n:=n+1; x:=1/n end; writeln(&apos ;So n nho ... có dạng: while <điều kiện> do <câu lệnh>; trong đó: - điều kiện thường là một phép so sánh; - câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép. Câu lệnh lặp này được thự...

Ngày tải lên: 30/07/2013, 01:25

... Var S,n: integer; Begin S:=0; n:=0; While S<=1000 do Begin S:= S+n; n:= n+1 end; Writeln ( so n nho nhat de tong >1000 la’,n); Writeln (‘Tong dau tien >1000 la’,S); Readln End. Ví dụ

Ngày tải lên: 12/09/2013, 13:31

... Write(‘Nhap gia tri cua a= ‘);Readln(a); S:=1/a;N:=1; REPEAT {Bat dau lap} S:=S+1/(a+N); N:=N+1 UNTIL 1/(a+N)< 0.0001; {Ket thuc lap} Writeln(‘Gia tri cua tong S = ‘,S:8:3); Readln; END. Trường

Ngày tải lên: 04/10/2013, 09:22

Ngày tải lên: 20/10/2013, 07:11

... (chứa phép so sánh).  Câu lệnh là a:=a+1 (câu lệnh đơn). VD2: While a>b do Begin write(‘a>b’); a:=a-1; End;  Trong đó :  While, do là các từ khóa.  Điều kiện là a>b (chứa phép so sánh). ... begin n:=n+1; S:=S+n ; end; write(‘Tong S= ’,S,‘ va ’,n,’ la so tu nhien nho nhat sao cho S>1000’); Readln; End. Tong S= 1035 va 45 la so tu nhien nho nhat sao cho S>1000 Caâu 1...

Ngày tải lên: 05/11/2013, 21:11

... thì 1/n càng nhỏ, nhưng luôn luôn lớn hơn 0 Quan sát chương trình * Lần lượt thay điều kiện sai _so bằng các giá trị 0.005; 0.002; 0.001, ta nhận các kết quả khác nhau. Viết chương trình tính

Ngày tải lên: 16/09/2013, 04:10

... có dạng: While <điều kiện> do <câu lệnh>  Trong đó: - Điều kiện thường là một phép so sánh. - Câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép. 2. Ví dụ về lệnh lặp với số ... vd3; var n,s:byte; begin s:=0;n:=0; while s<=1000 do begin n:=n+1;s:=s+n; end; writeln(&apos ;So can tim la: ',n); writeln(‘Tong tim duoc la:' , S); readln end. VD4: Haừy cho bieỏt

Ngày tải lên: 26/10/2013, 15:11

... thÕ nµo? SH1 = T - SH2 8 Nh×n tãm t¾t ®äc ®Ò to¸n? y 5 qu¶ t¸o 3 + y = 5 y = 5 - 3 y = 2 An Lan

Ngày tải lên: 31/05/2013, 00:20