PHẦN 1: TRẮC NGHIỆMKhoanh tròn câu trả lời đúng nhất A, B, C hoặc D.. Cấu trúc lặp được sử dụng để chỉ thị cho máy tính thực hiện lặp lại một vài hoạt động nào đó cho đến khi một điều ki
Trang 1PHẦN 1: TRẮC NGHIỆM
Khoanh tròn câu trả lời đúng nhất (A, B, C hoặc D) (Mỗi câu 0.5 điểm)
Câu 1: Phát biểu nào sau đây là đúng:
a Cấu trúc lặp được sử dụng để chỉ thị cho máy tính thực hiện lặp lại một vài hoạt động nào đó cho đến khi một điều kiện nào đó được thoả mãn
b Chỉ ngôn ngữ lập trình Pascal mới có các câu lệnh lặp để thể hiện cấu trúc lặp.
c Ngôn ngữ Pascal chỉ thể hiện cấu trúc lặp bằng câu lệnh for…do
d Câu B và C đúng.
Câu 2: Trong các câu lệnh Pascal sau, câu nào được viết đúng:
a for i:=1 to 10 do b for i:=1 to 10 do;
c for i=1 to 10 do d for i:1 to 10 do
Câu 3: Để thoát khỏi chương trình Pascal ta dùng tổ hợp phím:
a Ctrl + X, b Ctrl+ F9, c Alt + F9, d Alt +X
Câu 4 Trong các hoạt động dưới đây, đâu là hoạt động lặp với số lần chưa biết trước:
a Mỗi buổi học đúng 5 tiết
b Mỗi ngày ăn cơm 3 buổi
c Mỗi ngày phải học bài cho đến khi thuộc
d Rằm tháng Giêng là Tết Nguyên tiêu
Câu 5: Hãy cho biết giá trị của biến X bằng bao nhiêu sau khi thực hiện các câu lệnh:
while (i <10 ) do X :=X+1; i:=i+1; (Biết rằng trước đó giá trị của biến X là 0, i là 5)
Câu 6 : Ta có 2 lệnh sau : x :=0 ;
For i :=1 to 5 do x :=x+2; Giá trị của x là bao nhiêu:
Câu 7: Tính giá trị cuối cùng của b, biết rằng: a:= 3; b:= 5;
while (a<0) do b:= a + b; a:=a+1;
a b= 8; b b=3; c b= 5; d b= 0;
Câu 8: Câu lệnh lặp với số lần chưa biết trước là:
a While <điều kiện> do <câu lệnh >; b If <điều kiện> then <câu lệnh>;
c For <điều kiện> do <câu lệnh >; d While <câu lệnh> do <điều kiện>;
Câu 9: Cho câu lệnh sau: S:=S+1/I; Cho biết kiểu dữ liệu cần khai báo cho biến S là:
a.integer b byte c longint d real
Câu 10 : Trong Pascal, khai báo nào sau đây đúng?
a var tb: real; b var 4hs: integer; c var r=30; d const x: real;
Câu 11: Em học vẽ hình học động với phần mềm:
a Turbo Pascal b Geogebra
Câu 12: 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
Trang 2PHẦN II: TỰ LUẬN
Câu 1: (1.5đ) Viết chương trình nhập vào 1 số nguyên n từ bàn phím, in ra màn hình các
số lẻ nhỏ hơn hoặc bằng n?
Câu 2: (1.5đ) Viết chương trình tính n! với n! được định nghĩa như sau:
- n! = 1 với n = 0
- n! = 1.2.3 n (Tích của n số từ 1 đến n).
Câu 3: (1đ) Viết chương trình nhập vào 1 số nguyên n từ bàn phím, in ra màn hình tổng các số chẳn nhỏ hơn hoặc bằng n?