Câu 1: Cho đoạn chương trình sau:
S:=0;
while S > 10 do S:=S*2;
Vòng lặp while thực hiện bao nhiêu lần?
A. 0
B. 2
C. 10
D. 20
Câu 2: Lệnh nào sử dụng được sau khi khai báo thư viện CRT của Pascal?
A. GotoXY(a,b);
B. whereX và whereY
C. CLRSCR
D. Cả A,B,C
Bài 3 Cho thuật toán sau:
Bước 1: S 0; i 1;
Bước 2: Nếu i<=10 thì thực hiện S S + i; rồi chuyển sang bước 3 ngược lại chuyển sang bước 4.
Bước 3: i i + 1; rồi quay lại bước 2.
Bước 4: Thông báo giá trị của S rồi kết thúc.
a) Em hãy 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?
b) Khi kết thúc, giá trị của S là bao nhiêu?
c) Viết chương trình Pascal thể hiên thuật toán đó.
1A.0 lần
2D Cả A,B,C
3.
a)máy tính thực hiện 10 vòng lặp
b)S=55
c)program oken;
uses crt;
var s,i: integer;
begin
clrscr;
for i:=1 to 10 do
s:=s+i;
writeln(‘S: ‘,s);
readln;
end.
1a
2c
3 bước 4