Bài 8. Lặp với số lần chưa biết trước
Các câu hỏi tương tự
4. Câu hỏi bài tập:4.1/ Tìm hiểu câu lệnh lặp dưới đây và cho biết khi kết thúc câulệnh giá trị của biến S và biến n bằng bao nhiêu?S:0; n:0;While S10 doBeginn:n+1;S:S+n;End;Trả lời:Giá trị của biến S sau khi thực hiện...............Giá trị của biến n sau khi thực hiện...............4.2/ Gạch dưới chỗ sai của các câu lệnh sau và viết lại câu lệnh đúng:a) While X: 10 do X: X+1;→............................................................b) While X 5 for X: X-1→ .....................................
Đọc tiếp
4. Câu hỏi bài tập:
4.1/ Tìm hiểu câu lệnh lặp dưới đây và cho biết khi kết thúc câu
lệnh giá trị của biến S và biến n bằng bao nhiêu?
S:=0; n:=0;
While S<=10 do
Begin
n:=n+1;
S:=S+n;
End;
Trả lời:
Giá trị của biến S sau khi thực hiện
=...............
Giá trị của biến n sau khi thực hiện
=...............
4.2/ Gạch dưới chỗ sai của các câu lệnh sau và viết lại câu lệnh đúng:
a) While X:= 10 do X:= X+1;→............................................................
b) While X > 5 for X:= X-1→ .............................................................
c) While X< 10 do X = 5 ;→.................................................................
d) While X <> 0 ; do X:=X-1;→...........................................................
Sửa lại chương trình
Var a : integer;
Begin
a:=5;
While a<6 do begin
writeln(‘A’);
a := a + 1 ;
end;
end.
5. Bài tập thực hành:
Bài 1: Viết chương trình : “BAI8B1” tính tổng của các số tự nhiên liên
tiếp cho đến khi tổng lớn hơn 1000 thì dừng. Cho biết tổng tìm được và
con số cuối cùng được cộng vào:
Hướng dẫn Chương trình
1. Khai báo tên chương trình
2. Khai báo thư viện
3. Khai báo biến: S,n : số nguyên
4. Bắt đầu chương trình
5. Xóa màn hình
6. Gán S 0;n 1;
7. Trong khi S<=1000 thực hiện:
bắt đầu
SS+n
n n+ 1
kết thúc
8. In ra tổng S
9. In ra số n cuối cùng được cộng
10. Tạm dừng chương trình
11. Kết thúc chương trình
1....................................................................
2....................................................................
3....................................................................
4....................................................................
5....................................................................
6....................................................................
7....................................................................
......................................................................
......................................................................
......................................................................
......................................................................
8....................................................................
9....................................................................
10..................................................................
11..................................................................
19 tháng 3 2022 lúc 19:27
Hãy cho biết giá trị của S sau khi thực hiện xong đoạn lệnh, nếu nhập n = 6:
Write('Nhap n = '); Readln(n);
S:=0;
For i:= 1 To n Do S:= S + 2*i;
A. 21
B. 42
C. 6
D. 0
1. Lặp với số lần chưa biết trước là lệnh gì?
a. while..to..do
b. for …to…do
c. while …do
d. if…then
2. “Nếu trời mưa thì em không đi chơi đá bóng”. Là câu lệnh gì?
a. Câu lệnh lặp với số lần biết trước
b. Câu lệnh lặp với số lần chưa biết trước
c. Câu lệnh điều kiện
d. Câu lệnh in ra màn hình
3. Hãy cho biết giá trị đầu của câu lệnh dưới đây:
for i:5 to 21 do writeln(i*2);
a. 5 b. 6 c. 20 d. 21
4. Hãy cho biết giá trị cuối của câu lệnh dưới đây: for i:5 to 21 do writeln(i*2);...
Đọc tiếp
1. Lặp với số lần chưa biết trước là lệnh gì?
a. while..to..do
b. for …to…do
c. while …do
d. if…then
2. “Nếu trời mưa thì em không đi chơi đá bóng”. Là câu lệnh gì?
a. Câu lệnh lặp với số lần biết trước
b. Câu lệnh lặp với số lần chưa biết trước
c. Câu lệnh điều kiện
d. Câu lệnh in ra màn hình
3. Hãy cho biết giá trị đầu của câu lệnh dưới đây:
for i:=5 to 21 do writeln(i*2);
a. 5 b. 6 c. 20 d. 21
4. Hãy cho biết giá trị cuối của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2);
a. 5 b. 6 c. 20 d. 21
5. Hãy cho biết số vòng lặp của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2);
a. 15 b. 16 c. 17 d. 18
6. Câu lệnh GotoXY(3,5) có tác dụng gì?
a. Đưa con trỏ về cột 3, hàng 5
b. Đưa con trỏ về cột 5, hàng 3
7. Hãy cho biết đoạn lệnh sau đây thực hiện bao nhiêu vòng lặp?
S:=0;
While S>10 do writeln(s*s);
a. 0 b. 1 c. 9 d. 10
8. Hãy cho biết đoạn lệnh sau đây thực hiện bao nhiêu vòng lặp?
S:=3; N:=1
While S<=10 do
Begin
N:=N+1;
S:=S+N;
End;
a. 2 b. 3 c. 4 d. 5
II. Tự luận
Hãy cho biết đoạn lệnh sau đây in ra giá trị của S là bao nhiêu?
S:=3; N:=1
While S<=10 do
Begin
N:=N+1;
S:=S+N;
End;
Writeln(S);
Đoạn chương trình sau giá trị P là bao nhiêu @ i:>2 ; P:>1 ; n:>4 ; While i=n do Begin i:>i+1 ; P:>P+2*i ; end ;
Bài 1:
Trong các câu lệnh Pascal sau đây, câu lệnh nào đúng, câu lệnh nào sai. Em hãy khoanh tròn vào chỗ sai.
a) While i1 do t:10;
b) while ab; do write(b khong nho hon a);
c) while 11 do write(Toi lap trinh gioi);
d) i:1; while i10 do sum:sum+1; i:i+1;
e) i:1; x:5;
while ix do i: i+1; write( Gia tri cua i la,i);
Bài 2: Tìm hiểu đoạn chương trình sau và cho biết kết quả của i, j, k sau khi thực hiện đoạn chương trình là bao nhiêu
Đoạn 1:
i:1; j:2; k:3;
while i6 do i: i+1; j: j+1; k...
Đọc tiếp
Bài 1:
Trong các câu lệnh Pascal sau đây, câu lệnh nào đúng, câu lệnh nào sai. Em hãy khoanh tròn vào chỗ sai.
a) While i=1 do t:=10;
b) while a<=b; do write('b khong nho hon a');
c) while 1=1 do write('Toi lap trinh gioi');
d) i:=1; while i<10 do sum:=sum+1; i:=i+1;
e) i:=1; x:=5;
while i<x do i:= i+1; write(' Gia tri cua i la',i);
Bài 2: Tìm hiểu đoạn chương trình sau và cho biết kết quả của i, j, k sau khi thực hiện đoạn chương trình là bao nhiêu
Đoạn 1:
i:=1; j:=2; k:=3;
while i<6 do i:= i+1; j:= j+1; k:= k+j;
writeln(i,' ',j,' ',k);
Đoạn 2:
i:=1; j:=2; k:=3;
while i<6 do
begin
i:= i+1; j:= j+1; k:= k+j;
writeln(i,' ',j,' ',k);
end;
Sau khi thực hiện chương trình dưới đây, giá trị của biển J bằng bao nhiêu?
J :=2;
for i:= 5 to 10 do j:=j+1;
giúp mình với mai thi r
Câu 2: Lệnh While...do thuộc loại lệnh nào sau đây?
a.Lệnh rẽ nhánh. c. Lệnh vòng lặp.
b.Lệnh lựa chọn. d. Lệnh ghép.
Câu 3:Việc đầu tiên 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 While...do.
b.Thực hiện câu lệnh sau từ khóa Then.
c.Kiểm tra giá trị của điều kiện.
d.Kiểm tra câu lệnh.
Câu 4: Câu lệnh sau từ khóa do trong câu lệnh While...do được thực hiện ít nhất mấy lần?
a.0 lần....
Đọc tiếp
Câu 2: Lệnh While...do thuộc loại lệnh nào sau đây?
a.Lệnh rẽ nhánh. c. Lệnh vòng lặp.
b.Lệnh lựa chọn. d. Lệnh ghép.
Câu 3:Việc đầu tiên 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 While...do.
b.Thực hiện <câu lệnh> sau từ khóa Then.
c.Kiểm tra giá trị của < điều kiện>.
d.Kiểm tra < câu lệnh>.
Câu 4: Câu lệnh sau từ khóa do trong câu lệnh While...do được thực hiện ít nhất mấy lần?
a.0 lần. b. 1 lần. c. 2 lần. d. vô số lần.
Câu 5: Cho biết < câu lệnh> sau từ khóa DO trong đoạn chương trình sau được thực hiện mấy lần?
var i: byte;i:= 5;While i<=5 do i:= i-1;
a.1 lần b. 2 lần c. 5 lần d. 6 lần
Câu 6: Đoạn lệnh sau đây cho biết kết quả nào?
var i: byte;
i:= 5;
While i<=5 do
Begin
Write(i:2);
i:= i-1;
end;
a.In ra các số từ 1 đến 5; b.In ra các số từ 0 đến 5;
c.In ra các số lần lượt từ 5 đến 0; d. In ra vô hạn các số5, mỗi số trên một dòng.
Câu 7:Đoạn lệnh sau đây cho biết kết quả nào?
Var so: byte:
so:= 1;
While so<10 do writeln(so);
so:=so+1;
a.In ra các số từ 1 đến 9; b.In ra các số từ 1 đến 10;
c.In ra vô hạn các số1, mỗi số trên một dòng. d.In ra các số từ 10 đến 1.
Câu 8:Cho đoạn chương trình sau:
Var x, tong : byte;
x:=0; tong:=0;
While tong <= 20 do
Begin
Writeln(tong);
tong:=tong +1;
End;
x:=tong;
Sau khi đoạn chương trình trên được thực hiện, giá trị của x bằng bao nhiêu?
a.20. b. 21. c. Không xác định. d. 0.
Câu 9: Hãy cho biết kết quả của đoạn chương trình dưới đây?
a:=10;
While a< 11do writlen(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ữ.
c.Trên màn hình xuất hiện vô số chữ số10,chương trình bị lặp vô tận.
d.Trên màn hình xuất hiện một số11.
Câu 10: Khi sửdụng lệnh While...do cần chú ý điều gì?
a.Số lần lặp. b. Số lượng câu lệnh.
c.Không cần chú ý gì cả. d.Điều kiện vòng lặp để tránh vòng lặp không bao giờ kết thúc.
Câu 11:Câu lệnh viết đúng 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 <câu lệnh> do < câu lệnh>;
Giup mình với nhé, mn
TRẮC NGHIỆM:
Câu 1:Vòng lặp sau thực hiện bao nhiêu lần lặp:
For i : 1 to 5 do a : a + 1;
A. 3 lần. B. 4 lần. C. 5 lần. D. 6 lần.
Câu 2:Số lần lặp được tính như thế nào?
A. Giá trị đầu–giá trị cuối B. Giá trị đầu–giá trị cuối + 1 C.Giátrịcuốigiátrịđầu . Giá trị cuối–giá trị đầu + 1
Câu 3:Trong câu lệnh lặp, kiểu dữ liệu của biến đếm là:
A. Real B. String C.Integer D. Char
Câu 4:Câu lệnh lặp với số lần ch...
Đọc tiếp
TRẮC NGHIỆM:
Câu 1:Vòng lặp sau thực hiện bao nhiêu lần lặp:
For i := 1 to 5 do a := a + 1;
A. 3 lần. B. 4 lần. C. 5 lần. D. 6 lần.
Câu 2:Số lần lặp được tính như thế nào?
A. Giá trị đầu–giá trị cuối B. Giá trị đầu–giá trị cuối + 1 C.Giátrịcuốigiátrịđầu . Giá trị cuối–giá trị đầu + 1
Câu 3:Trong câu lệnh lặp, kiểu dữ liệu của biến đếm là:
A. Real B. String C.Integer D. Char
Câu 4:Câu lệnh lặp với số lần chưa biết trước bắt đầu bằng từ khóa:
A. For B.While C. If D. Var
Câu 5:Vòng lặp sau cho kết quả bằng bao nhiêu:
i := 0; T := 0; While i < 3 do begin T := T + 1; i := i + 1; end;
A. T = 2 B. T = 3 C. T = 4 D. T = 5
Câu 6:Khai báo biến kiểu mảng nào sau đây là hợp lệ:
A. Var A, B: array[1..50] of integer;
B. Var A, B: array[1..N] of real;
C. Var A: array[100..1] of integer;
D. Var B: array[1.5..10.5] of real;
Câu 7:Cú pháp câu lệnh lặp với số lần chưa biết trước:
A. For ... to... do
B. For <biến đếm>:=<giá trị cuối> to <giá trị đầu> do <câu lệnh>;
C. For ... do
D. For <biến đếm>:=<giá trị đầu > to <giá trị cuối > do <câu lệnh>;
Câu 8:Chọn câu lệnh đúng:
A. x:=1; while x:= 10 do x:=x+5;
B. x:=1; while x> 10 do x:=x+5;
C. x:=1; while x<10 do x:=x+5;
D. x:=10; while x< 10 do x=x+5;
Câu 9:Trong câu lệnh For ... do, sau từ khóa “Do” có hai câu lệnh trở lên ta “gói” chúng trong:
A. Begin...readln;
B. Begin...and;
C. End...Begin
D. Begin... end;
Câu 10:Cho biết ý nghĩa của câu lệnh sau: For i:=1 to 10 do Readln(a[i]);
A. In dãy số trong mảng a
B. Nhập dãy số cho mảng a
C. Nhập giá trị cho biến i
D. In giá trị cho biến i
Câu 11:Các câu lệnh sau, câu lệnh nào hợp lệ ?
A. For i:=1 to 10 do; write (‘a’)
B. For i:=1 to 10 do write (‘a’);
C.var x:real; begin for x:=1 to 10 do write (‘a’); end.
Câu 12:Cho đoạn chương trình:
J:= 0; For i:= 1 to 5 do J:= j + i;
Sau khi thực hiện đoạn chương trình trên, giá tị của biến J bằng bao nhiêu?
A. 12
B. 22
C. 15
D. 42
Giúp mình nha! Cần gấp!
Hãy tìm hiểu các cụm câu lệnh sau đây và cho biết với các câu lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a)
S:=0; n:=0;
while S<=10 do
begin n:=n+1; S:=S+n end;
b)
S:=0; n:=0;
while S<=10 do
n:=n+1; S:=S+n;