22.Vòng lặp (Do … While) là dạng vòng lặp?
1. Không xác định và kiểm tra điều kiện trước khi lặp
2. Không phương án nào đúng
3. Không xác định và kiểm tra điều kiện sau khi lặp
4. Cả hai dạng trên
Cấu trúc lặp nào sau đây không được cho trước trong các nhóm lệnh của Scrath?
A. Lặp một khối lệnh với so lần định trước.
B. Lặp một khối lệnh vô hạn lần.
C. Lặp với điều kiện được kiểm tra trước khi thực hiện khối lệnh.
D. Lặp với điều kiện được kiểm tra sau khi thực hiện khối lệnh.
Chọn D. Lặp với điều kiện được kiểm tra sau khi thực hiện khối lệnh.
Câu 21: Vòng lặp While – do kết thúc khi nào
A. Khi một điều kiện cho trước được thỏa mãn
B. Khi đủ số vòng lặp
C. Khi tìm được Output
D. Tất cả các phương án
Câu 22: Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?
A. Thực hiện < câu lệnh > sau từ khóa Do
B. Kiểm tra giá trị của < điều kiện >
C. Thực hiện câu lệnh sau từ khóa Then
D. Kiểm tra < câu lệnh >
Câu 23: Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
i := 5;
While i>=1 do i := i – 1;
A. 1 lần
B. 2 lần
C. 5 lần
D. 6 lần
Câu 24:Hãy cho biết kết quả của đoạn chương trình dưới đây:
a:=10; While a < 11 do write (a);
A. Trên màn hình xuất hiện một số 10
B. Trên màn hình xuất hiện 10 chữ a
C. Trên màn hình xuất hiện một số 11
D. Chương trình bị lặp vô tận
Câu 25:Câu lệnh sau giải bài toán nào:
While M <> N do
If M > N then M:=M-N else N:=N-M;
A. Tìm UCLN của M và N
B. Tìm BCNN của M và N
C. Tìm hiệu nhỏ nhất của M và N
D. Tìm hiệu lớn nhất của M và N
Câu 26:Hoạt động nào sau đây lặp với số lần lặp chưa biết trước?
A. Ngày tắm hai lần
B. Học bài cho tới khi thuộc bài
C. Mỗi tuần đi nhà sách một lần
D. Ngày đánh răng 2 lần
Câu 27:cú pháp lệnh lặp với số lần chưa biết trước:
A. While < điều kiện > to < câu lệnh >;
B. While < điều kiện > to < câu lệnh 1 > do < câu lệnh 2 >;
C. While < điều kiện > do ;< câu lệnh >;
D. While < điều kiện > do < câu lệnh >;
Câu 28:Tính tống S = 1 + 2 + 3 + … + n + … cho đến khi S>108. Điều kiện nào sau đây cho vòng lặp while – do là đúng:
A. While S>=108 do
B. While S < 108 do
C. While S < 1.0E8 do
D. While S >= E8 do
Câu 29:Pascal sử dụng câu lệnh lặp nào sau đây để lặp với số lần chưa biết trước:
A. For…do
B. While…do
C. If..then
D. If…then…else
Câu 30:Hãy đưa ra kết quả trong đoạn lệnh:
x:=1; While x<=5 do write(‘Hoa hau’);
A. x:=1
B. X>=5
C. Hoa hau
D. Không có kết quả.
Điều kiện cần để dừng vòng lặp trong thuật toán tuần tự là:
A. Kiểm tra đối tượng có đúng là đối tượng cần tìm không?
B. Kiểm tra đã hết danh sách chưa?
C. Kiểm tra đối tượng có đúng là đối tượng cần tìm không hoặc Kiểm tra đã hết danh sách chưa?
Đáp án C bởi vì:
- Khi chạy đến hết danh sách thì bắt buộc phải dừng vì không còn giá trị nào trong danh sách để lấy mà kiểm tra nữa.
- Khi kiểm tra xong đối tượng mà ta cần tìm thì tất nhiên là ta sẽ dừng lại vòng lặp vì có được đáp án rồi, đó được gọi là "điều kiện để dừng vòng lặp".
Câu 1:Vòng lặp While – do kết thúc khi nào
A. Khi một điều kiện cho trước được thỏa mãn
B. Khi đủ số vòng lặp
C. Khi tìm được Output
D. Tất cả các phương án
Câu 2:Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?
A. Thực hiện < câu lệnh > sau từ khóa Do
B. Kiểm tra giá trị của < điều kiện >
C. Thực hiện câu lệnh sau từ khóa Then
D. Kiểm tra < câu lệnh >
Câu 3:Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
i := 5;
While i>=1 do i := i – 1;
A. 1 lần
B. 2 lần
C. 5 lần
D. 6 lần
Câu 4:Hãy cho biết kết quả của đoạn chương trình dưới đây:
a:=10; While a < 11 do write (a);
A. Trên màn hình xuất hiện một số 10
B. Trên màn hình xuất hiện 10 chữ a
C. Trên màn hình xuất hiện một số 11
D. Chương trình bị lặp vô tận
Câu 5:Câu lệnh sau giải bài toán nào:
While M <> N do
If M > N then M:=M-N else N:=N-M;
A. Tìm UCLN của M và N
B. Tìm BCNN của M và N
C. Tìm hiệu nhỏ nhất của M và N
D. Tìm hiệu lớn nhất của M và N
Câu 1: A
Câu 2: B
Câu 3: C
Câu 4: A
Câu 5: A
Vòng lặp While – do kết thúc khi nào
Khi tìm được Output
Tất cả các phương án
Khi một điều kiện cho trước chưa được thỏa mãn
Khi đủ số vòng lặp
Cần xem lại
2
Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?
Thực hiện câu lệnh sau từ khóa Then
Kiểm tra < câu lệnh >
Kiểm tra giá trị của < điều kiện >
Thực hiện < câu lệnh > sau từ khóa Do
Cần xem lại
3
Hoạt động nào sau đây lặp với số lần lặp chưa biết trước?
Ngày đánh răng 2 lần
Ngày tắm hai lần
Học bài cho tới khi thuộc bài
Mỗi tuần đi nhà sách một lần
Cần xem lại
4
Cú pháp lệnh lặp với số lần chưa biết trước:
While < điều kiện > do ;< câu lệnh >;
While < điều kiện > to < câu lệnh >;
While < điều kiện > do < câu lệnh >;
While < điều kiện > to < câu lệnh 1 > do < câu lệnh 2 >;
Cần xem lại
5
Pascal sử dụng câu lệnh lặp nào sau đây để lặp với số lần chưa biết trước:
While…do
If..then
For…do
If…then…else
Cần xem lại
6
Kiểu dữ liệu của biến đếm trong lệnh lặp For – do:
Không cần phải xác định kiểu dữ liệu
Chỉ cần khác kiểu với giá trị đầu
Cùng kiểu với các biến trong câu lệnh
Cùng kiểu với giá trị đầu và giá trị cuối
Cần xem lại
7
Chọn cú pháp câu lệnh lặp là:
for < biến đếm > = < giá trị đầu > to < giá trị cuối > do < câu lệnh >;
for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >;
for < biến đếm > := < giá trị cuối > to < giá trị đầu > do < câu lệnh >;
for < biến đếm > = < giá trị đầu > to < giá trị cuối >; do < câu lệnh >;
Cần xem lại
8
Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng :
for i:=1 to 10; do x:=x+1;
for i:=1 to 10 do x:=x+1;
for i =10 to 1 do x:=x+1;
for i:=10 to 1 do x:=x+1;
Cần xem lại
9
Với ngôn ngữ lập trình Passcal câu lệnh lặp for i:=1 to 10 do x:=x+1; thì biến đếm i phải được khai báo là kiểu dữ liệu nào?
String
Real
Integer
Tất cả các kiểu trên đều được
Cần xem lại
10
Trong lệnh lặp For – do:
Giá trị đầu phải bằng giá trị cuối
Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối
Giá trị đầu phải lớn hơn giá trị cuối
Giá trị đầu phải nhỏ hơn giá trị cuối
Cần xem lại
11
Trong câu lệnh lặp: For (Biến đếm):=(Giá trị đầu) to (Giá trị cuối) do (câu lệnh); Khi thực hiện ban đầu Biến đếm nhận giá trị = Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm:
1 đơn vị
4 đơn vị
2 đơn vị
3 đơn vị
Cần xem lại
12
Trong các câu lệnh lặp Pascal sau đây, câu nào đúng
While i= 1 do T:=10;
While 1 := 1 do Writeln ('Dung');
While (n mod i <> 0) ; do i:= i+ 1 ;
While x<=y do Writeln ('y khong nho hon x')
Cần xem lại
13
Trong câu lệnh lặp for…do, số vòng lặp là biết trước và bằng:
giá trị cuối – giá trị đầu
giá trị cuối – giá trị đầu - 1
giá trị cuối – giá trị đầu
giá trị cuối – giá trị đầu + 1
Cần xem lại
14
Điều kiện trong câu lệnh lặp với số lần chưa biết trước thường là :
phép gán
Câu lệnh ghép
Phép so sánh
Câu lệnh đơn
Cần xem lại
15
Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
b := 3;
While b>=1 do b := b– 1;
2 lần
1 lần
4 lần
3 lần
Cần xem lại
16
Hãy cho biết kết quả của đoạn chương trình dưới đây:
a:=10; While a < 11 do write (a);
Trên màn hình in ra một số 10
Chương trình bị lặp vô tận
Trên màn hình in ra 10 chữ a
Trên màn hình in ra một số 11
Cần xem lại
17
Hãy đưa ra kết quả trong đoạn chương trình sau:
x:=1;
While x<=5 do
Begin
writeln(‘khoi 8’);
X:=x+x;
End;
Trên màn hình in ra dòng chữ "khoi 8"
Trên màn hình in ra 1 dòng chữ "khoi 8 khoi 8 khoi 8"
Chương trình bị lặp vô tận
Trên màn hình in ra 03 dòng chữ "khoi 8"
Cần xem lại
18
Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 100
1
Tất cả đều sai
99
100
Cần xem lại
19
Em hãy ghép nối cột bên trái với cột bên phải để được ý nghĩa đúng của các câu lệnh:
Câu lệnh {5}
Khởi tạo gán biến t= 1
Câu lệnh {2}
In ra màn hình kết quả của biến t
Câu lệnh {7}
Khai báo biến
Câu lệnh {10}
In ra màn giá trị biến đếm i từ 1 đến 5 trên 5 dòng
Câu lệnh {8}
Câu lệnh gán giá trị t = t* i
Câu lệnh {4}
Câu lệnh lặp for ..do: lặp 5 lần thực hiện câu lệnh ghép
Cần xem lại
20
For k:= 0 to 10 do writeln(k);
-Đoạn chương trình viết bằng câu lệnh while ..do như sau:
;
while do
;
;
;
21
Em hãy ghép nối cột bên trái với cột bên phải để được ý nghĩa đúng của các câu lệnh chính trong CẤU TRÚC CHUNG CỦA MỘT CHƯƠNG TRÌNH PASCAL:
{1} Program (tên chương trình);
{2} Uses (tên thư viện);
{3} Begin
{4} Clrscr;
(các câu lệnh);
{5} Readln;
{6} End.
Câu lệnh {5}
Bắt đầu chương trình chính
Câu lệnh {1}
Kết thúc chương trình chính
Câu lệnh {6}
Tạm ngừng màn hình để xem kết quả
Câu lệnh {4}
Khai báo tên chương trình
Câu lệnh {3}
Khai báo thư viện
Câu lệnh {2}
Xóa màn hình kết quả
Bài tập 1:Khi thực hiện câu lệnh lặp for, to, do máy tính kiểm tra một điều kiện, điều kiện cần phảikiểm tra là gì?
* Tham khảo :
Khi thực hiện, ban đầu biến đếm sẽ nhận giá trị đầu, sau mỗi vòng lặp, biến đếm sẽ tự động tăng thêm một đơn vị cho đến khi bằng giá trị cuối.
Nêu cú pháp hoạt động vòng lặp không xác định của vòng lặp while....do...
Cú pháp: While <Điều kiện> do <câu lệnh>;
Nêu cú pháp và cách thực hiện vòng lặp với số lần biết trước (For...do)?Cách xác định số vòng lặp?Lấy ví dụ,xác định số vòng lặp và kết quả sau khi kết thúc vòng lặp
Tin học 8
Câu 1: Khi thực hiện câu lệnh lặp for,to, do máy tính kiểm tra một điều kiện, điều kiện cần phải kiểm tra là gì?
Câu 2: Em hãy mô tả thuật toán và viết chương trình nhập vào một số tự nhiên n khác 0. Tìm tất cả các ước của n.
Câu 3: Em hãy mô tả thuật toán và viết chương trình nhập vào một số tự nhiên n khác 0. Đếm tất cả các ước của n.
Câu 4: Em hãy mô tả thuật toán và viết chương trình nhập vào một số tự nhiên n khác 0. Tính tổng tất cả các nước của n.
Câu 5: Em hãy mô tả thuật toán và viết chương trình nhập vào một số tự nhiên n khác 0. Tính tích tất cả các ước của n.
Câu 6: Em hãy mô tả thuật toán và viết chương trình nhập vào một số tự nhiên n khác 0. Tính tổng các số chẵn trong đoạn 1 đến n.
Câu 7: Em hãy mô tả thuật toán và viết chương trình nhập vào hai số tự nhiên a và b (a <> 0; b <> 0; a <= 0)
Câu 8: Em hãy mô tả thuật toán và viết chương trình nhập vào một số tự nhiên n khác 0. Kiểm tra xem n có là số nguyên tố hay không?
làm hộ mình nha
P/s: ở đây mình chỉ viết chương trình thôi, còn thuật toán bạn có thể suy ra từ chương trình nhé:
Câu 2:
uses crt;
var n,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
if n mod i=0 then write(i:4);
readln;
end.
Câu 3:
uses crt;
var n,i,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
dem:=0;
for i:=1 to n do
if n mod i=0 then dem:=dem+1;
writeln('So uoc cua ',n,' la: ',dem);
readln;
end.
Câu 4:
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if n mod i=0 then t:=t+i;
writeln('Tong cac uoc cua ',n,' la: ',t);
readln;
end.
Câu 5:
uses crt;
var n,i:integer;
s:real;
begin
clrscr;
write('Nhap n='); readln(n);
s:=1;
for i:=1 to n do
if n mod i=0 then s:=s*i;
writeln('Tich cac uoc cua ',n,' la: ',s:4:2);
readln;
end.
Câu 6:
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 2=0 then t:=t+i;
writeln('Tong cac so chan trong khoang tu 1 den ',n,' la: ',t);
readln;
end.
Câu 8:
uses crt;
var n,i,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
kt:=0;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if (kt=0) and (n>1) then writeln(n,' la so nguyen to')
else writeln(n,' khong la so nguyen to');
readln;
end.