BÀI TẬP ÔN TẬP TRỰC TUYẾN TIN 8

BÀI TẬP ÔN TẬP TRỰC TUYẾN TIN 8 (bài tập câu lệnh while.... Số lần lặp vô hạn B.[r]

BÀI TẬP ÔN TẬP TRỰC TUYẾN

TIN 8 (bài tập câu lệnh while do)

I/ CÂU LỆNH LẶP WHILE…DO(với số lần lặp không biết trước)

1/ Cú pháp

 WHILE<điều kiện> do <câu lệnh>;

2/ Câu lệnh được thực hiện như sau:

B1: kiểm tra điều kiện B2: Nếu điều kiện sai câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc Nếu điều kiện đúng,thực hiện câu lệnh và quay lại B1

II/ BÀI TẬP:

Bài 1: Cho đoạn chương trình sau:

Var a:integer;

Begin

a:= 5;

while a < 7 do

begin

writeln(‘A’);

a:=a+1;

end;

readln;

End

Có bao nhiêu chữ A được in ra màn hình?

ĐIỀU KIỆN

CÂU LỆNH

S

Đ

Bài 2: Đoạn lệnh sau đây sẽ cho kết quả gì?

So:=1;

While So<10 do

begin

writeln(So);

So:= So+2;

end;

a/ In ra các số từ 1 đến 9

b/ In ra các số từ 1 đến 10

c/ In ra các số 1 ; 3 ; 5 ; 7 ; 9

d/ Không phương án nào đúng

Bài 3: Câu lệnh lặp While … do có:

A Số lần lặp vô hạn

B Số lần lặp biết trước

C Số lần lặp không biết trước

D.Không thực hiện lần lặp nào

Bài 4: viết chương trình tính tổng các số nguyên từ 1 đến n với n được nhập từ bàn phím

Program tinh_tongn;

Uses crt;

Var n,i:integer;

Tong:longint;

Begin

Clrscr;

Write(‘nhap n=’);readln(n);

Tong:=0;i:=1;

While i<=n do

Begin Tong:=tong+i;

i:=i+1;

end;

writeln(‘tong tu 1 den n=’,tong);

readln;

end

Bài 5:viết chương trình nhập vào 1 số nguyên cho đến khi gặp số 0 thì kết thúc.Hãy đếm xem có bao nhiêu

số chẳn và lẻ vừa nhập vào (học sinh tự làm ở nhà)

Bài 6: viết chương trình tìm UCLN và BCNN của 2 số a,b được nhập từ bàn phím

Program tim_ucln_bcnn;

Uses crt;

Var a,b,p,ucln,bcnn:integer;

Begin

Clrscr;

Write(‘nhap a=’);readln(a);

Write(‘nhap b=’);readln(b);

p:=a*b;

While a<>b do

Begin

If a>b then a:=a-b

Else b:=b-a;

End;

ucln:= a;

Writeln(‘UCLN(a,b)=’,ucln);

Writeln(‘BCNN(a,b)=’,p/ucln:0:0);

Readln;

End

Bài 7: Chọn 1 chương trình mà em đã viết bằng câu lệnh lặp For…to do Hãy viết chương trình đó sang câu lệnh lặp While…do

CHÚC CÁC EM ÔN TẬP THÀNH CÔNG