1. Câu lệnh While 1=1 do write ('toi lap trinh gioi');
A. Sai ở câu lệnh
B. Sai lỗi lập trình
C. Đúng
D. Sai từ khóa
2.     a:=4;  While a<=9 do write('A');
Kết quả sẽ xuất hiện bao nhiêu kí tự A
A. 4 kí tự A
B. 5 kí tự A
C. 6 kí tự A
D. Lỗi lặp vô hạn lần
3. Khi thực hiện chương trình,câu"Hello" được viết ra màn hình mấy lần?
    N:=0;While N>=0 do
         Begin
               N:=N+1;Writeln('Hello');
        End;
A. 10               B.9
C.0                 D. Vòng lặp vô tận
4. Khi thực hiện chương trình,câu"Pascal" được viết ra màn hình mấy lần?
    N:=1;  While N<0 do
          Begin
                 N:=N+1;  Writeln('Pascal');
        End;
A. 10                 B. 9
C. 0                   D. Vòng lặp vô tận
5. Trong ngôn ngữ lập trình Pascal, ta có câu lệnh
         For i:=1 to 100 do write(i:4);
Nếu muốn sử dụng vòng lặp while...do ta phải viết câu lệnh while...do như thế nào?
A. while i <=100 do write(i:4);
B. while i>=100 do write(i:4);
C. while i:=i to 100 do write(i:4);
D. while i=100 do write(i:4);