bài tập câu lệnh While

Thao gi ng ch o m ng ng y nh giáo Vi t Nam 20-11ả à ừ à à ệ
TỔ: TIN HỌC Giáo viên: Phan Thị Phương Tuyền
TỔ: TIN HỌC Giáo viên: Phan Thị Phương Tuyền
L p 11 M Ng y 12 tháng 11 n m 2005ớ à ă

Bi 2
TÄØ CHỈÏC LÀÛP
Tiãút thỉï 2
BI TÁÛP LÀÛP VÅÏI SÄÚ LÁƯƯN
CHỈA BIÃÚT TRỈÅÏC

1. Cụ phạp:
WHILE <Âiãưu kiãûn> DO
<Cáu lãûnh>;
2. Gii thêch:
* WHILE, DO: Tỉì khoạ lãûnh
* Âiãưu kiãûn: Mäüt biãøu thỉïc quan lãû hồûc logic
* Cáu lãûnh : L 1 cáu lãûnh trong TP
I. L
I. L
thuút:
thuút:

I. L
I. L
thuút:
thuút:
3. Så âäư khäúi:
Cáu lãûnh
Âiãưu kiãûn
Sai
ụngÂ

I. L
I. L
thuút:
thuút:
4. Cạc bỉåïc thỉûc hiãûn lãûnh:
Bỉåïc 1: Tênh giạ trë v kiãøm tra iãưu kiãûnÂ
Bỉåïc 2: Nãúu iãưu kiãûn âụng thç thỉûc hiãûn cáu
lãûnh, räưi quay lãn lải bỉåïc 1.
Bỉåïc 3: Kãút thục cáu lãûnh.

I. L
I. L
thuút
thuút
5. Chụ :
* Nãúu iãưu kiãûn ban âáưu l Sai thç cáu
lãûnh s khäng âỉåüc thỉûc hiãûn láưn no.
* Nãúu iãưu kiãûn ln nháûn giạ trë
ụng  thç cáu lãûnh l ûp vä hản.à
* Trạch l ûp vä hản thç phi cọ cáu à
lãûnh lm thay âäøi giạ trë ca iãưu Â
kiãûn.

II
II


CẠC BI TOẠN:
CẠC BI TOẠN:
Bi 1:
Nháûp tỉì bn phêm hai säú ngun dỉång A v B,
âỉa ra kãút qu ỉåïc säú chung låïn nháút.

Phán têch bi toạn:
1. ải lỉåüng vo/ra:Â
Input :
Hai säú A,B
Output:
USCLN(A,B)
2.Täø chỉïc dỉỵ liãûu:
Biãún:
A,B: Säú ngun

3.Så âäư khäúi:
Kãút thục
Nháûp A,B
A := A - B
B := B - A
A<>B
A>B
USCLN L A
Bàõt âáưu
Sai
Âụng
Âụng
Sai

4. Chỉång trçnh:
PROGRAM USCLN;
USES CRT;
VAR A , B : WORD;
BEGIN
CLRSCR;
WRITE('NHAP SO NGUYEN DUONG A:'); READLN(A);
WRITE('NHAP SO NGUYEN DUONG B:'); READLN(B);
WHILE A<>B DO
IF A>B THEN A:=A-B
ELSE B:=B-A;
WRITELN('UOC SO CHUNG LON NHAT LA:',A);
READLN
END.

5. CHẢY THỈÍ CHỈÅNG TRÇNH:

II.CẠC BI TOẠN:
Bi 2
Tênh täøng: S = 1+ 1/3 + 1/5+ . + 1/(2n - 1) Cho âãún khi 1/(2n-1) < E
* E l mäüt säú vä cng bẹ nháûp tỉì bn phêm

Phán têch bi toạn:
1. ải lỉåüng Â
vo/ra:
Input: Nháûp säú E vä cng bẹ
Output:
Täøng S
2.Täø chỉïc dỉỵ liãûu:
Biãú
n:
E,S: säú thỉûc

3.Så âäư khäúi:
S:=S+1/(2 * I-1)
Bắt đầu
Nhập E
S:=1; I:=2
1/(2*I –1)>=E
In S
Kết thúc
Đúng
Sai
I:=I+1

4.Chỉång trçnh:
PROGRAM TINH_TONG;
USES CRT;
VAR E, S: REAL; I:INTEGER;
BEGIN
CLRSCR;
WRITELN('NHAP SO E: ); READLN(E);’
I:=2; S:=1;
WHILE (1/(2*I-1))>=E DO
BEGIN
S:=S+1/(2*I-1); I:=I+1;
END;
WRITELN('TONG S = ',S:8:2);
READLN
END.

5. Chảy thỉí chỉång trçnh:

Xem chi tiết: bài tập câu lệnh While