Không thực hiện được vì giá trị của biến đếm có kiểu thứ tự là Real Câu 7: Trong các câu lệnh sau, câu nào đúng:.. Do để viết chương trình..[r]
(1)A/ Trắc nghiệm:
Khoanh tròn câu mà em cho nhất: (4đ)
Câu 1: Đâu công việc phải thực nhiều lần với số lần biết trước?
a Hàng ngày em học b Ngày đánh ba lần
c Đến nhà bà ngoại chơi vào hôm bố mẹ vắng d Em bị ốm vào dịp có dịch cúm Câu 2: Cú pháp câu lệnh lặp for … … ?
a If (điều kiện) then (câu lệnh); b For (biến đếm):=(giá trị đầu) to (giá trị cuối) do (câu lệnh); c Var n, i:interger; d Phải kết hợp a, b c
Câu 3: Câu lệnh pascal sau hợp lệ?
a For i:=100 to writeln(‘A’); b For i:=1.5 to 10.5 writeln(‘A’);
c For i= to 10 writeln(‘A’); d For i:= to 10 writeln(‘A’);
Câu 4: Trong khai báo sau, khai báo hợp lệ:
Câu 5: Hãy đọc đoạn chương trình sau:
s:=0;
for i:=1 to s:=s* i; sau thực xong kết là:
a b 20 c 25 d 39
Câu 6: Vòng lặp while vòng lặp:
a Biết trước số lần lặp c Chưa biết trước số lần lặp
b Biết trước số lần lặp giới hạn <=100 d.Biết trước số lần lặp giới hạn >=100
Câu 7: Câu lệnh lặp while…do có dạng là:
a While <điều kiện> do; <câu lệnh>; b While <điều kiện> <câu lệnh> do; c While <câu lệnh> <điều kiện>; d While <điều kiện> <câu lệnh>;
Câu 8: Cho S i biến kiểu nguyên Khi chạy đoạn chương trình :
S:= 0; i:= 1;
while i<= begin
S:= S + i; i:= i + 2; end; Giá trị sau S :
A 16 B C D
B: Tự luận (6đ)
Câu 1: Viết chương trình nhập vào số nguyên N in hình dãy ngược N (Ví dụ: N = 3, in màn hình Dãy 321) (1đ)
Câu 2: (2đ) Sử dụng vòng lặp While để viết chương trình
Tính tích N số tự nhiên (Với N số nguyên nhập từ bàn phím) a program VD-1;
uses crt; var a,b: real;
b program VD_3; var a,b: real; uses crt;
d program VD_4; var a,b: real; c program VD 2;
(2)Đánh dấu [x] vào ô sai tương ứng câu lệnh Pascal sau sai sửa lại? ( 3điểm)
Câu lệnh Đúng Sai Sửa lại
Program Chuong- trinh; Var i: real;
n: Integer Begin; N= 10;
For i:=1 to n do; Writeln(i); Readln End
(3)A/ Trắc nghiệm:
Khoanh tròn câu mà em cho nhất: (4đ) Câu 1: Câu lệnh lặp while…do có dạng là:
a While <điều kiện> do; <câu lệnh>; c While <điều kiện> <câu lệnh> do; b While <câu lệnh> <điều kiện>; d While <điều kiện> <câu lệnh>; Câu 2:Hãy đọc đoạn chương trình sau:
s:=0;
for i:=1 to s:=s* i; sau thực xong kết là:
a 20 b 25 c d 39
Câu 3: Vòng lặp while vòng lặp:
a Biết trước số lần lặp b Chưa biết trước số lần lặp
c Biết trước số lần lặp giới hạn <=100 d.Biết trước số lần lặp giới hạn >=100
Câu 4: Câu lệnh pascal sau hợp lệ?
a For i:=100 to writeln(‘A’); b For i:=1.5 to 10.5 writeln(‘A’);
c For i= to 10 writeln(‘A’); d For i:= to 10 writeln(‘A’);
Câu 5: Đâu công việc phải thực nhiều lần với số lần biết trước?
a Hàng ngày em học b Ngày đánh ba lần
c Đến nhà bà ngoại chơi vào hôm bố mẹ vắng d Em bị ốm vào dịp có dịch cúm
Câu 6: : Cú pháp câu lệnh lặp for … Do … ?
a If (điều kiện) then (câu lệnh); b For (biến đếm):=(giá trị đầu) to (giá trị cuối) do (câu lệnh); c Var n, i:interger; d Phải kết hợp a, b c
Câu 7: Trong khai báo sau, khai báo hợp lệ:
Câu 8: Cho S i biến kiểu nguyên Khi chạy đoạn chương trình :
S:= 0; i:= 1;
while i<= begin S:= S + i; i:= i + 2; end; Giá trị sau S :
A 16 B C D
B: Tự luận (6đ)
Câu 1: Viết chương trình nhập vào số nguyên N in hình dãy ngược N (Với N = 10, in màn hình Dãy 10 ) (1đ)
Câu 2: (2đ) Sử dụng vòng lặp While Do để viết chương trình
Tính hiệu N số tự nhiên (Với N số nguyên nhập từ bàn phím a program VD-1;
uses crt; var a,b: real;
c program VD 2; user crt; var a,b: real;c:Real b program VD_3;
var a,b: real; uses crt;
(4)Đánh dấu [x] vào ô sai tương ứng câu lệnh Pascal sau sai sửa lại? ( 3điểm)
Câu lệnh Đúng Sai Sửa lại
Program Chuong trinh; Const n:=10
Var i: real; Begin;
For i:=1 to n do; Writeln(i); Readln End
(5)A/ Trắc nghiệm:
Khoanh tròn câu mà em cho nhất: (4đ) Câu 1: Phát biểu sau đúng ?
a Cấu trúc lặp sử dụng để thị cho máy tính thực lặp lại vài hoạt động điều kiện thoả mãn
b Chỉ ngơn ngữ lập trình Pascal có câu lệnh lặp để thể cấu trúc lặp
c Ngôn ngữ Pascal thể cấu trúc lặp với số lần lặp cho trước câu lệnh while…do
Câu 2: Lệnh lặp sau đúng?
a For <biến đếm>= <giá trị đầu> to <giá trị cí> <câu lệnh>; b For <biến đếm>:= <giá trị đầu> to <giá trị cí> <câu lệnh>; c For <biến đếm>:= <giá trị cí> to <giá trị đầu> <câu lệnh>; d For <biến đếm>: <giá trị đầu> to <câu lệnh> <giá trị cuối>;
Câu 3: Câu lệnh dạng for (biến đếm) : = (giá trị cuối) downto giá trị đầu) (câu lệnh);
a giá trị đầu nhỏ giá trị cuối b giá trị đầu lớn giá trị cuối
b Cả a b c Cả a b sai
Câu 4: Trong câu lệnh sau, câu đúng:
a For i: = 100 to 1 do writeln(‘C’); b For i: = 1 to 10 do writeln(‘C’); c For i= 1 to 10 do writeln(‘C’); d For i: = 1.5 to 9.5 do writeln(‘C’); Câu 5: Câu lệnh viết cú pháp là:
a While <điều kiện> to <câu lệnh>; b While <điều kiện> do <câu lệnh>;
c While <điều kiện> to <câu lệnh1> do <câu lệnh 2>; d While <điều kiện>; do <câu lệnh>; Câu 6: Sau thực đoạn chương trình
j:= 0; for i:= to j:=j+2; giá trị in hình là?
a b c d.10
Câu 7: for i:= to 3.5 writeln(i:3:1); viết hình?
a Thứ tự biến đếm, chiếm chỗ lấy chữ số sau phần thập phân b Viết số viết số 3.5
c Chỉ viết số 3.5 mà thơi
d Khơng thực giá trị biến đếm có kiểu thứ tự Real Câu 8: : Cho S i biến kiểu nguyên Khi chạy đoạn chương trình :
S:= 0; j:= 2;
while j<= do begin
S:= S + j; j:= j + 2; end;
Giá trị sau S :
A B C 12 D 14
B: Tự luận (6đ)
Câu 1: Viết chương trình in hình thứ tự bảng chữ cai từ ‘A’ đến ‘Z’ ( in hình A, B,C, Y,Z ) (1đ)
(6)Tính
1 1 1
1
2 3
S
n
(Với N số nguyên nhập từ bàn phím) Câu 3: ( 3điểm)
Đánh dấu [x] vào ô sai tương ứng câu lệnh Pascal sau sai sửa lại?
Câu lệnh Đúng Sai Sửa lại
Program Chuong trinh Const n:=10
Var i,s : real; Begin;
While i< n do; Begin
S:=s+i I =i+1; End.
Writeln(s); Readln End;
(7)ĐỀ KIỂM TRA TIẾT (d)
Môn: Tin Học Thời gian 45 phút A/ Trắc nghiệm:
Khoanh tròn câu mà em cho nhất: (4đ) Câu 1: Câu lệnh viết cú pháp là:
a While <điều kiện> to <câu lệnh>; b While <điều kiện> do <câu lệnh>;
c While <điều kiện> to <câu lệnh1> do <câu lệnh 2>; d While <điều kiện>; do <câu lệnh>; Câu : Cho S i biến kiểu nguyên Khi chạy đoạn chương trình :
S:= 0; j:= 2;
while j<= do begin
S:= S + j; j:= j + 2; end;
Giá trị sau S :
A B C 12 D 14
Câu 3: Vòng lặp while vòng lặp:
a Biết trước số lần lặp b Chưa biết trước số lần lặp
c Biết trước số lần lặp giới hạn <=100 d.Biết trước số lần lặp giới hạn >=100 Câu 4: Câu lệnh dạng for (biến đếm) : = (giá trị cuối) downto giá trị đầu) (câu lệnh);
c giá trị đầu nhỏ giá trị cuối b giá trị đầu lớn giá trị cuối
d Cả a b c Cả a b sai
Câu 5: Phát biểu sau đúng ?
a Cấu trúc lặp sử dụng để thị cho máy tính thực lặp lại vài hoạt động điều kiện thoả mãn
d Chỉ ngơn ngữ lập trình Pascal có câu lệnh lặp để thể cấu trúc lặp
e Ngôn ngữ Pascal thể cấu trúc lặp với số lần lặp cho trước câu lệnh while…do
Câu 6: for i:= to 3.5 writeln(i:3:1); viết hình?
e Thứ tự biến đếm, chiếm chỗ lấy chữ số sau phần thập phân f Viết số viết số 3.5
g Chỉ viết số 3.5 mà
h Khơng thực giá trị biến đếm có kiểu thứ tự Real Câu 7: Trong câu lệnh sau, câu đúng:
a For i: = 100 to 1 do writeln(‘C’); b For i: = 1 to 10 do writeln(‘C’); c For i= 1 to 10 do writeln(‘C’); d For i: = 1.5 to 9.5 do writeln(‘C’); Câu : Sau thực đoạn chương trình
j:= 0; for i:= to j:=j+2; giá trị in hình là?
a b c d.10
B: Tự luận (6đ)
Câu 1: Viết chương trình in ngược hình thứ tự bảng chữ cai từ ‘z’ đến ‘a’ ( in hình z, y c,b,a ) (1đ)
(8)Tính
1 1 1
1
2 3
S
n
(Với N số nguyên nhập từ bàn phím) Câu 3: ( 3điểm)
Đánh dấu [x] vào ô sai tương ứng câu lệnh Pascal sau sai sửa lại?
Câu lệnh Đúng Sai Sửa lại
Program Chuong trinh Var i,s : real;
Begin
Const n:=10; While i< =n do; Begin