Giả sử a là biến có kiểu thực ,chọn lệnh phù hợp khi viết chương trình:.. Kiểu Integer có phạm vi giá trị từ:A[r]
(1)Họ tên………Ngày sinh……… Lớp:……….Số báo danh………
I Phần trắc nghiệm
1 Hàm div dùng để:
A Tính bậc B Chia lấy phần dư C Làm tròn số D Chia lấy phần nguyên Từ tên chuẩn:
A END B Readln C If D TYPE Để nhập giá trị vào biến a ta có câu lệnh:
A Readln(a); B Realn(a); C Readln('a'); D Read('a'); Giả sử a biến có kiểu thực ,chọn lệnh phù hợp viết chương trình:
A a=1
y B a:=b*b C a:=− b
x ; D a:=
1 y+x
Để in dãy số: 10
A For i:=1 To 10 write('1 10'); B For i:=1 To 10 write(i); C For I : = To 10 Do write(I , ' '); D For I :=1 To 10 Do write('I '); Kiểu Integer có phạm vi giá trị từ:
A đến 216-1 B -215 đến 215-1 C -231 đến 231-1 D đến 225 Cú pháp lệnh If dạng thiếu :
A If <điều kiện> then <câu lệnh> B If <điều kiện> then <câu lệnh>; C If <câu lệnh> then <điều kiện> ; D If <câu lệnh> else <điều kiện> ; Cho chương trình Pascal sau
Program cb1;
Var x,y: real; Begin
Write('x= '); readln(x); Y:=(((x+2)*x+3)*x+4)*x+5; Writeln('y=',y);
End
Chương trình tính giá trị biểu thức biểu thức sau: A y=x+2x+3x+4x+5
B y=x3+5x2+4x+5
C y=(x+2)(x+3)(x+4)+5 D y= x4+2x3+3x2+4x+5
9 Các tên ngươì lập trình đặt sau đây, tên sai với quy định củaTP Pascal?
a Begin b A_Var
SỞ GIÁO DỤC VÀ ĐẦO TẠO BẮC GIANG ĐỀ THI HỌC SINH GIỎI MÔN TIN HOC 11 TTRƯỜNG PHỔ THÔNG CẤP - TÂN SƠN NĂM HỌC 2008 - 2009
(2)c For_2006 d Pascal7 10.cấu trúc chương trình TP gồm:
a phần tên, câu lệnh, phần thân chương trình b Phần khai báo phần thân chương trình
c Phần tên, phần khai báo thư viện khai báo biến
d phần khai báo, thân chương trình, phần kết thúc chương trình 11 khai báo sau khai báo không khai báo thư viện::
a Uses Graph; b Uses Unit1; c Var Crt; d Uses MyUnit;
12 để biên dịch chương Pascal TP ta nhấn tổ hợp phím: a Ctrl+F9; b Ctrl+F7; c Alt+F7; d Alt+F9;
13 Để khai báo biến a blà hai cạnh hình chữ nhật, ta dùng cách khai báo hợp lí? a Var a,b: Word; b Var a,b: Real;
c Var a,b: Integer; d Var a,b: Longint; 14.Các câu lệnh sau câu lệnh gán
a Var a := Integer; c a := 100; b m = n+50; d Const a= 5; 15 Trong TP câu lệnh sai :
a Readln(a); b Writeln(‘Nhap lai a>0’); c Write(‘ Nhap a duong ’); d Real(a);
16 Cho biểu thức
2 4
2
b b ac
a
Ta viết biểu thức TP Pascal sau:
a –b+sqr(b2-4*a*c)/2*a b (–b+sqrt(b*b-4*a*c))/(2*a) c –b+sqrt(sqr(b)-4*a*c)/(2*a) d (–b+sqrt(b*b-4*a*c)/2*a) 17 Muốn nhập giá trị biến a từ bàn phím ta dùng câu lệnh sau:
a Read(a); Readln(a); b Wreadln(a); c Writeln(a); d Write(a); 18 Để thực chương trình Pascal ta dùng tổ hợp phím:
a ALT+F9 b CTRL+F9 c CTRL+F7 d ALT+F7 19 Biểu thức toán học x4+ex
2
cos2
(x) biểu diễn TP Pascal
(3)20 Cho N biến nguyê,ta có biểu thức logic sau(N mod <> 0) and (N mod =0) điều kiện để xác định
a N số chắn N chia hết cho b N số chẵn N không chia hết cho c N số lẻ N chia hết cho
d N số lẻ va N không chia hết cho
21 Cách biểu diễn Pascal ABS(X)-ABS(Y) /Y+X biểu diễn biểu thức: a) |x − y|
y+x b)
|x − y|
y +x
c)
|x|−|y|
y+x d) y
x x
y
II- Tự luận
1- Cho chương trình sau: PROGRAM baitap;
VAR i: Byte; {Dòng 1}
BEGIN
i:=100; {Dòng 2}
Write(‘Gia tri cua i luc dau la :’,i); (Dòng 3}
i:=i+10; {Dòng 4}
Write(‘Gia tri cua i luc sau la: ‘,i:5); {Dòng 5}
Readln; {Dòng 6}
END
Yêu cầu: Giải thích câu lệnh
(4)