Không có câu nào đúng hết á bạn vì 1 luôn bé hơn 5 nên chương trình này chạy vô hạn lần
Không có câu nào đúng hết á bạn vì 1 luôn bé hơn 5 nên chương trình này chạy vô hạn lần
Với x:=2 cho thực hiện 2 dòng lệnh sau:
A.Kết quả tong khác nhau, và kết quả x khác nhau.B.Kết quả tong giống nhau, và kết quả x giống nhau.C.Kết quả tong giống nhau, và kết quả x khác nhau.D.Kết quả tong khác nhau, và kết quả x giống nhau.
Với x:=2 cho thực hiện 2 dòng lệnh sau:
A.Kết quả tong khác nhau, và kết quả x khác nhau.B.Kết quả tong giống nhau, và kết quả x giống nhau.C.Kết quả tong giống nhau, và kết quả x khác nhau.D.Kết quả tong khác nhau, và kết quả x giống nhau.
Với x:=2 cho thực hiện 2 dòng lệnh sau:
A.Kết quả tong khác nhau, và kết quả x khác nhau.B.Kết quả tong giống nhau, và kết quả x giống nhau.C.Kết quả tong giống nhau, và kết quả x khác nhau.D.Kết quả tong khác nhau, và kết quả x giống nhau.
Cho đoạn chương trình sau
I:=1;
While n<5 do
Begin tong:= tong + I; I:= I+ 1;
End
Sau đoạn chương trình cho biết biến " tong " có giá trị bằng bao nhiêu ?
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 14:Hãy tìm hiểu các thuật toán sau đây và cho biết khi thực hiện thuật toán, máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó.
a) Thuật toán 1:
Bước 1. S ← 10, x ← 0.5
Bước 2. Nếu S ≤ 5.2, chuyển tới bước 4.
Bước 3. S ← S –x và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
b) Thuật toán 2:
Bước 1. S ←10, n ← 0.
Bước 2. Nếu S ≥ 10, chuyển tới bước 4.
Bước 3. n ← n+3, S ← S-n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
Câu 15: Hãy tìm hiểu mỗi đoạn chương trình Pascal sau đây và cho biết với đoạn 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;
Câu 16: Sử dụng cấu trúc lệnh While ...do để viết chương trình tính tổng của các số tự nhiên liên tiếp bé hơn 20.
Câu 17: Sử dụng cấu trúc lệnh While ...do để viết chương trình tính tích của các số tự nhiên liên tiếp từ 1 đến n.
giúp với nhé, mình cảm ơn nhiều lắm ^-^
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
A. Trắc nghiệm
Câu 1: Đâu là từ khóa của câu lệnh lặp với số lần không biết trước?
A. IF…THEN… B. FOR…TO…DO… C. WHILE…DO…
Câu 2: Đâu là câu lệnh ghép?
A. Begin i:=i+1; writeln(i); End;
B. i:=i+1; writeln(i);
C. i:=i+1;
Câu 3: Màn hình xuất hiện gì sau khi chạy chương trình dưới đây:
Var i,S: integer;
Begin
S:=0;
i:=1;
While S<=8 do
Begin
S:=S+i;
i:=i+1;
End;
Writeln(‘Tong tim duoc co gia tri la: ‘, S);
End.
A. Tong tim duoc co gia tri la: 6
B. Tong tim duoc co gia tri la: 10
C. Tong tim duoc co gia tri la: 15
B. Tự luận:
Câu 4: Trình bày cú pháp và tác dụng của câu lệnh lặp với số lần không biết trước?
Câu 5: Viết chương trình tính tổng 100 số tự nhiên đầu tiên (Sử dụng câu lệnh lặp While).
Cho đoạn chương trình:
j:= 2;
for i:= 1 to 5 do j:= j+1;
Sau khi thực hiện chương trình trên, giá trị của biến j bằng bao nhiêu?
A. 7; B. 8; C. 9; D. 10