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 đó.

2 câu trả lời

1a

2c

3 bước 4

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.