Mọi đối tượng trong chương trình đều phải được đặt tên theo quy tắc của ngôn ngữ lập trình dùng để viết chương trình đó.. Câu 2.[r]
(1)A Trắc nghiệm: Hãy chọn phương án trả lời cho câu sau: (3 điểm) Câu 1: Cho khai báo
biến:
var m, n : integer;
x, y : real ; Phép gán sai?
Câu 7: Chọn câu lệnh sai câu lệnh sau: a if a < b ; then x := x + 1;
b if a < b then x := a + b;
c if a < b then x := a else x := b; d if a < b then x := b – a;
a x := 6; b m := - 4;
c y := 10.5; d n := 3.5; Câu 2: Cho đoạn lệnh
sau, hiển thị hình gì?
for n := to
write(n, ‘ ’);
Cho đoạn chương trình sau: begin
x := a;
if a < b then x := b; end
a b
c d Câu 3: Chương trình
sau cho kết gì? var a, b, m : integer; begin
a := 5; b := 4;
m :=
sqrt(a+b); writeln(‘m = ’, m : : 1); readln end
a 3.0 b Báo lỗi
c 9.0 d Câu 4: Giá trị biểu
thức:
100 /
(10*3/0.5/ (2*6)) = ?
Câu 10: x := 10; y := 20; writeln(‘x + y’); kết hình gì?
a b 10
c 20 d 15
a x + y b 20
c 10 d 30 Câu 5: Đoạn chương
trình sau cho kết bao nhiêu?
t := 0;
for i := to t := t*i; writeln(t);
Câu 11: Biểu diễn cơng thức tốn học − b+√2 a
3 pascal gì? a (- b + sqrt(2*a))/3
b (- b + sqrt(2a))/3 c (- b + sqr(2*a))/3 d (- b + sqr(2a))/3 a
b 10
c 15 d Câu 6: Cho đoạn
chương trình sau: s := 0; i :=
Câu 12: Cho đoạn chương trình sau: s := 0; i :=
(2)while s <= 10
begin
i := i + 1; s := s + i; end;
Cho biết câu lệnh while dừng i bao nhiêu?
begin
i := i + 1; s := s + i; end;
Cho biết câu lệnh while dừng s bao nhiêu?
a b
c d
a 12 b 13
c 14 d 15 Câu 13: Chuyển sang Pascal phát biểu sau: (3 điểm)
a) Nếu x số khơng âm hiển thị bậc hai x, ngược lại khơng tính b) Thực 20 lần việc hiển thị dòng chữ ‘Chao cac ban!’ hình
c) Nếu a chia hết cho hiển thị a số chẵn, ngược lại hiển thị a số lẻ d) Thực việc hiển thị hình kí tự từ a z
Câu 14: Viết chương trình hiển thị bậc hai số chẵn từ 50 (4 điểm) Câu 1: Cách khai báo biến cách khai báo sau:
A Var x,i: integer; B Var <x,y>: Real;
C Var x;i: char; D Var x i: boolean;
Câu 2: Trong ngơn ngữ lập trình pascal với câu lệnh sau: ( a biến kiểu thực) a:=2009;
writeln(a:6:3) ; ghi hình?
A Ket qua la: 2009.000 B 2009 C Ket qua la :2009 D 2009.000 Câu 3: Giá trị biểu thức 30 div mod (2*2) là:
A B C D
Câu 4: x2 biểu diễn Pascal là:
A SQRT(x) B exp(x) C abs(x) D sqr(x)
Câu 5: Để tính diện tích S hình chữ nhật có chiều dài 18 chiều rộng 15, cách khai báo S hợp lý nhất?
A Var S: Integer; B Var S: Real;
C Var S: byte; D Var S: Longint;
Câu 6: Cho biết kết chạy đoạn chương trình sau: i:=3;
for i:=2 to s:=s+i; writeln(‘Ket qua la:’,s);
A 30 B.31 C.32 D.33 Câu 7: Cho đoạn chương trình sau:
writeln(‘Nhap k:’); read(k); if k mod = then write(k);
Cho biết đoạn chương trình thực việc gì?
A Giá trị k chia hết cho B Giá trị k không chia hết cho
C Giá trị k D Thông báo lỗi
Câu 8: Để tính S=1+2+3+…+100 ta gán S:=0; For i:=1 to 100 … Điền vào dấu “…”
A S:=S+i; B S:=S+100; C S:=S+1; D Cả A, B, C
Câu 1: Kiểu liệu có phạm vi giá trị từ đến 216− 1 kiểu liệu sau?
A Kiểu LongInt B Kiểu Integer C Kiểu Word D Kiểu Byte Câu 2: Cho câu lệnh gán M:=12; N:=21; A:=(M mod 3=0) and (N div 5=1); Hỏi A có giá trị thuộc kiểu liệu giá trị nhận được?
(3)A Bình phương, bậc hai, trị tuyệt đối B Trị tuyệt đối, bậc hai, bình phương C Căn bậc hai, trị tuyệt đối, bình phương D Căn bậc hai, bình phương, trị tuyệt đối Câu 4: Xét khai báo sau: Var x, y: Integer; c: Char; r: Real; kt: Boolean; Hỏi tổng nhớ cấp cho tất biến Byte?
A 10 byte B 11 byte C 13byte D 12 byte
Câu 5: Các phần mềm lập trình TURBO PASCAL, VISUAL BASIC, VISUAL FOXPRO, C/C+ +… thuộc loại ngơn ngữ lập trình nào?
A Một phương án khác B Ngơn ngữ lập trình bậc cao C Hợp ngữ D Ngôn ngữ máy
Câu 6: “Lập trình sử dụng (1)… (2)… ngơn ngữ lập trình để mơ tả (3)… diễn đạt thao tác (4) ” Các cụm từ thiếu theo thứ tự là:
A Các câu lệnh, liệu, thuật toán, cấu trúc liệu B Các câu lệnh, thuật toán, liệu, cấu trúc liệu
C Dữ liệu, thuật toán, cấu trúc liệu, câu lệnh D Cấu trúc liệu, câu lệnh, liệu, thuật toán
Câu 7: Một biểu thức quan hệ cho giá trị thuộc kiểu kiệu kiểu liệu sau?
A Số ngun B Kí tự C Lơgic D Số thực
Câu 8: Có loại biểu thức Pascal?
A B C D
Câu 9: Ngôn ngữ dùng để viết chương trình gọi gì?
A Ngơn ngữ máy B Ngơn ngữ lập trình C Một phương án khác D Lập trình Câu 10: Biểu thức (x>y) and (y>3) thuộc loại biểu thức Pascal?
A Biểu thức quan hệ B Biểu thức logic C Một loại biểu thức khác D Biểu thức số học
Câu 11: Cho dãy câu lệnh gán z:=3; z:=z-1; y:=sqr(z)-3*z+abs(z); Sau thực dãy câu lệnh y có giá trị bao nhiêu?
A B C D
Câu 12: Biểu thức Sin(√X2+3 x+5)+|y2−2 y − 3| viết Pascal biểu thức?
A sqrt(sin(x*x+3*x+5))+abs(y*y-2*y-3) B Sin(sqrt(x*x+3*x+5))+abs(y*y-2*y-3) C Sin(sqrt(x*x+3*x+5)+abs(y*y-2*y-3)) D Sin(sqr(x*x+3*y+5))+(y*y-2*x-3) Câu 13: Khẳng định khẳng định sau đúng?
A Một chương trình khơng cần có phần khai báo B Biến dùng chương trình dùng khơng cần khai báo C Bắt buộc phải khai báo tên chương trình
D Một chương trình khơng cần có phần thân
Câu 14: Để đưa liệu hình dùng câu lệnh câu lệnh sau?
A Writeln read B Read readln C Write readln D Write writeln
Câu 15: Biến P nhận giá trị 5; 10; 15; 20; 30; 60; 90 biến X nhận giá trị 0,1; 0,2; 0,3; 0,4; 0,5 Khai báo khai báo sau đúng?
A Var X, P: Byte; B Var P: Real; X: Byte; C Var X: Real; P: Byte; D Var X, P: Real;
Câu 16: Biểu thức sqrt(x+y)/x-sqr(x-y)/y viết toán học biểu thức nào? A √x + y
x −( x − y
y )
B √x + y x −(
x − y y )
2
C
x − y¿2 ¿ ¿
√x + y x −¿
D
x+ y¿2 ¿ ¿ ¿
Câu 17: Một chương trình viết ngơn ngữ lập trình bậc cao gồm phần:
A Phần khai báo thư viện phần thân B Phần thân phần khai báo C Phần khai báo tên chương trình phần thân D Phần thân phần khai báo biến Câu 18: Biên dịch là? Hãy chọn phương án đúng:
(4)Câu 19: Trong Pascal biến nhận giá trị thuộc phạm vi từ 10 đến 256 biến khai báo kiểu liệu nào?
A Kiểu Real B kiểu Byte C Kiểu Char D Kiểu Word
Câu 20: Trong Pascal phép toán Div, Mod thuộc nhóm phép tốn nào?
A Nhóm phép tốn số học với số thực B Nhóm phép tốn quan hệ
C Nhóm phép tốn lơgic D Nhóm phép tốn số học với số ngun Câu 21: Kiểu liệu số nguyên Pascal bao gồm: byte, integer, word, longInt có nhớ lưu trữ giá trị là:
A – – – byte B – – – byte C – – – byte D – – – byte
Câu 22: Những tên tên sau thuộc loại tên dành riêng Pascal?
A PROGRAM, VAR, BEGIN, TYPE, CONST B BAI_TAP, BEGIN, TYPE, CONST, USES
C PROGRAM, BEGIN, TYPE, CONST, SQRT D VAR, BEGIN, END, A, B, DELTA Câu 23: Các từ khóa Const, Var, Type, Uses Pascal để khai báo gì?
A Hằng, biến, kiểu, thư viện B Biến, kiểu, thư viện, C Hằng, thư viện, biến, kiểu D Biến, kiểu, hằng, thư viện
Câu 24: Cho câu lệnh gán a:=1; b:=3; c:=-4; D:=(b*b-4*a*c); x1:=(-b-sqrt(d))/(2*a); x2:=(-b+sqrt(d))/(2*a); Hỏi sau thực dãy câu lệnh d, x1, x2 nhận giá trị bao nhiêu?
A 25, -4, B 25, 1, -4 C -4, 25, D 1, 25, -4 Câu 25: Thông dịch là? Chọn phương án đúng:
A Dịch lệnh B Tất phương án C Chạy chương trình D Dịch tồn chương trình
Câu Trong phát biểu sau, phát biểu sai
A Tên người lập trình đặt số tên người lập trình tự đặt dùng với ý nghĩa riêng, không trùng với tên dành riêng, không cần khai báo trước
B Tên chuẩn số tên ngơn ngữ lập trình dùng với ý nghĩa định
C Tên dành riêng số tên ngơn ngữ lập trình quy định dùng với ý nghĩa riêng xác định, người lập trình khơng sử dụng với ý nghĩa khác
D Mọi đối tượng chương trình phải đặt tên theo quy tắc ngơn ngữ lập trình dùng để viết chương trình
Câu Trong ngơn ngữ lập trình Pascal, từ khố VAR dùng để
A khai báo thư viện B khai báo
C khai báo biến D khai báo tên chương trình
Câu Cho biểu thức Pascal: abs(x+1) - Biểu thức tương ứng Toán học là:
A |x +1|− 1 B 1−|x+1| C |x − 1|+1 D 1+|x − 1|
Câu Phát biểu đúng?
A Nếu chương trình nguồn có lỗi cú pháp chương trình đích có lỗi cú pháp
B Trong chế độ thông dịch câu lệnh chương trình nguồn dịch thành câu lệnh chương trình đích
C Mọi tốn có chương trình để giải máy tính
D Chương trình dãy lệnh tổ chức theo quy tắc xác định ngôn ngữ lập trình cụ thể
Câu Trong biểu diễn đây, biểu diễn tên chuẩn Pascal?
A Var B Longint C Begin D Uses
Câu Trong ngơn ngữ lập trình Pascal, từ khoá USE dùng để
A khai báo B Câu lệnh viết sai
C khai báo tên chương trình D khai báo thư viện
Câu Trong ngơn ngữ lập trình Pascal, với câu lệnh sau: Writeln("KQ la:",a); ghi hình?
A Ket qua la a B KQ la a
C KQ la <giá trị a> D Câu lệnh viết sai
(5)A 'Hoa co mua xuan' B "Hoa co mua xuan"
C 'Hoa co mua xuan" D Hoa co mua xuan
Câu Cho biểu thức toán học √x2+1 − x Biểu thức tương ứng Pascal là:
A Sqrt(sqr(x) + - x.) B Sqr(sqrt(x) + 1) - x
C Sqr(sqrt(x) + - x) D Sqrt(sqr(x) + 1) - x
Câu 10. Trong ngôn ngữ lập trình Pascal, với câu lệnh sau (với a biến kiểu số thực): a:=12;
Writeln('KQ la:',a:7:3); ghi hình?
A Khơng đưa B KQ la 12 C KQ la: 12.000 D Ket qua la 12
Câu 11 Trong ngơn ngữ lập trình Pascal, kiểu liệu kiểu sau có miền giá trị lớn nhất?
A Integer B Byte C Word D Longint
Câu 12 Chương trình viết ngơn ngữ bậc cao có ưu điểm:
A Tốc độ thực nhanh so với chương trình viết ngơn ngữ máy
B Khai thác tối đa khả máy
C Ngắn gọn, dễ hiểu, dễ hiệu chỉnh nâng cấp, không phụ thuộc vào loại máy
D Viết dài nhiều thời gian so với chương trình viết ngơn ngữ máy
Câu 13 Trong ngôn ngữ Pascal, tên sau tên chuẩn:
A Ab_s B Sqrt C Real D Integer
Câu 14 Trong ngơn ngữ lập trình Pascal, từ khố PROGRAM dùng để
A khai báo tên chương trình B khai báo biến
C khai báo D khai báo thư viện
Câu 15 Cho biểu thức Pascal 1/(sqr(a)+1).Biểu thức tương ứng Toán học là:
A
√a+1 B
1 a2
+1 ; C. a
2
+1 ; D a+11 ;
Câu 16 Cho biểu thức toán học x − y
x −1 Biểu thức tương ứng Pascal là:
A x - y/x - B (x - y)/(x -1) C x - 1/x - y D (x - 1)/(x - y)
Câu 17 Trong ngơn ngữ lập trình Pascal, khẳng định sau, khẳng định sai?
A Phần khai báo có khơng B Phần thân chương trình có khơng
C Phần thân chương trình thiết phải có D Phần tên chương trình khơng thiết phải có
Câu 18 Chương trình dịch là:
A Chương trình dịch ngơn ngữ máy ngơn ngữ tự nhiên
B Chương trình dịch ngơn ngữ tự nhiên ngơn ngữ máy
C Chương trình có chức chuyển đổi chương trình viết ngơn ngữ lập trình bậc cao thành chương trình thực máy tính cụ thể
D Chương trình có chức chuyển đổi chương trình viết ngơn ngữ máy thành ngôn ngữ bậc cao
Câu 19 Trong biểu diễn đây, biểu diễn từ khoá Pascal?
A Integer B sqrt C Real D END
Câu 20 Trong Turbo Pascal, để biên dịch chương trình
A Nhấn tổ hợp phím Ctrl + F9 B Nhấn tổ hợp phím Shift + F9
C Nhấn tổ hợp phím Alt + F9 D Nhấn phím F3 II Tự luận (5đ):
Câu 1: Viết lại chương trình sau cho cho biết chương trình thực cơng việc gì? (2đ)
Program Tinh; (1)
Write(’trung binh cong la’, TBC); (2)
Uses crt; (3)
TBC:real; (4)
Begin (5)
(6)Begin (7)
Read(so); (8)
Var so, N, s: integer; (9)
S:=s+so; (10)
Dem:=dem+1; (11)
While so<>0 (12)
TBC:=s/dem; (13)
End (14)
Clrscr; (15)
Readln; (16)
End; (17)
Câu 2: Viết chương trình giải phương trình bậc nhất: ax+b=0 (với a,b) (3đ) HD: xét trường hợp a,b: a ≠ ngược lại xt: b=0, ngược lại xt: b ≠ 0 Câu 1: Chương trình sau làm gì?
Var i, k: byte; a: String;
Begin Write(‘Nhap xau:’); Readln(a); k:= length(a); for i:=k downto write(a[i]);
End
A Nhập xâu, xuất xâu B Nhập xâu, đảo ngược xâu
C Nhập xâu, chèn xâu D Nhập xâu, xuất xâu với thứ tự nguợc lại với xâu nhập
Câu 2: Trong PASCAL, để khai báo cho biến tệp văn ta dùng thủ tục nào?
A Var <tên tệp> : Text; B Var <tên biến tệp> : String; C Var <tên biến tệp> : Text; D Var <tên tệp> : String; Câu 3: Hàm thủ tục có gọi chương trình hay sai?
A Đúng B Sai C - D -
Câu 4: Rewrite(<tên biến tệp>) ; có ý nghĩa ?
A Thủ tục đọc liệu từ tệp B Thủ tục ghi liệu vào tệp C Thủ tục mở tệp để ghi liệu D Thủ tục đóng tệp
Câu 5: Để vẽ điểm đoạn thẳng, trước vẽ ta đặt màu cho nét vẽ thủ tục A Procedure Setbackground(color: word); B Corlor(color: word) ;
C Setbackground(color:integer); D Procedure SetColor(color: word) Câu 6: Trong PASCAL, để khai báo hai biến tệp văn f1, f2 ta sử dụng cú pháp:
A Var f1 f2 : Text; B Var f1 , f2 : Text;
C Var f1 : f2 : Text; D Var f1 ; f2 : Text;
Câu 7: Để thao tác với tệp, trước hết ta phải gán tên tệp với đại diện biến tệp thủ tục A Assign(<tên tệp>,< biến tệp>); B Assign( <tên tệp> := < biến tệp>); C Assign(< biến tệp> := <tên tệp>); D Assign(< biến tệp>,<tên tệp>);
Câu 8: Cấu trúc chương trình gồm phần:
A B C C
Câu 9: Var <tên biến tệp> : Text ; có ý nghĩa ?
A Thủ tục đóng tệp B Khai báo biến tệp
C Thủ tục gán tên tệp D Thủ tục mở tên tệp để đọc liệu Câu 10: Chương trình sau cho kết bao nhiêu?
Var S : string[5] ;
(7)A B C D 14 Câu 11: Để tham chiếu đến phần tử hàng thứ 3, cột biến mảng chiều A, ta viết
A A [3, 4] B A [4, 3] C A [3 4] D A [4 3]
Câu 12: Để chép kí tự từ vị trí thứ 10 xâu s, ta dùng câu lệnh:
A Copy (s,5,10); B Copy (10,s,5); C Copy (10,5,s); D Copy (s,10,5); Câu 13: Khai báo var Hoten:string [9]; gán Hoten:= ‘Tin hoc 11’; Khi đó, biến Hoten có giá trị
A Tin hoc B Tin hoc 11 C Tin hoc D Tin
Câu 14: Để gắn tệp KQ.TXT cho biến tệp f1 ta sử dụng câu lệnh
A Asign(‘ KQ.TXT ’, f1); B Assign(f1,‘ KQ.TXT ’);
C F1 := ‘ KQ.TXT ’; D KQ.TXT := f1;
Câu 15: Trong PASCAL, mở tệp để “ đọc ”dữ liệu ta sử dụng thủ tục nào? A Rewrite(<biến tệp>); B Reset(<biến tệp>); C Reset(<tên tệp>); D Rewrite(<tên tệp>); Câu 16: Để kết thúc chế độ đồ hoạ để trỏ chế độ văn ta gọi thủ tục
A CloseGraph; B StopGrap;
C ClosesGrap; D CloseGrap;
Câu 17: Hàm LENGTH ( ‘123 Tin hoc’ ) ; cho giá trị ?
A 12 B 10 C 13 D 11
Câu 18: Assign(<biến tệp>,<tên tệp>) ; có ý nghĩa ?
A Thủ tục đóng tệp B Thủ tục gán tên tệp cho biến tệp C Khai báo biến tệp D Thủ tục mở tên để đọc liệu Câu 19: Kiểu ghi định nghĩa khai báo sau:
A Type <tên kiểu ghi> = record
< tên trường 1>: <kiểu trường 1>; ………. < tên trường n>: <kiểu trường n>;
end;
Var <tên biến ghi>:= <tên kiểu ghi>; B Begin Type <tên kiểu ghi> = record
begin < tên trường 1>: <kiểu trường 1>;
………
< tên trường n>: <kiểu trường n>; end;
Var <tên biến ghi>:= <tên kiểu ghi>; C Type <tên kiểu ghi> = record
< tên trường 1>: <kiểu trường 1>;
……….
< tên trường n>: <kiểu trường n>; Var <tên biến ghi>:= <tên kiểu ghi>;
D Type <tên kiểu ghi> = record
< tên trường 1>: <kiểu trường 1>;
(8)< tên trường n>: <kiểu trường n>; Câu 20: Khai báo Var hovaten:string[20]; có nghĩa
A Khai báo kiểu liệu xâu có độ dài
B Khai báo kiểu liệu xâu có độ dài lớn 20 kí tự C Khai báo kiểu liệu mảng có độ dài 20 kí tự D Khai báo độ dài xâu có độ dài nhỏ 20 kí tự
Câu 21: Giả sử mảng a có giá trị sau: a[1]=3, a[2]=-1, a[3]= 0, a[4] =-3, a[5]=8 Muốn in giá trị tất phần tử mảng hình ta dùng câu lệnh:
A for i:=1 to read(a[i]); B for i:=1 to read(a(i)); C for i:= to write(a(i)); D for i:=1 to write(a[i]);
Câu 22: Để khởi tạo chế độ đồ hoạ ta dùng thủ tục để thiết lập chế độ đồ hoạ? A Procedure InitGraph [var driver,mode:interger; path:string];
B Procedure InitGraph(var driver,mode:interger,path;string); C Procedure InitGraph(var driver,mode:interger; path:string); D Procedure InitGraph(var path:string driver,mode:interger;); Câu 23: Để đặt màu cho hình ta dung thủ tục sau:
A TextColor(color) B TextBackground(color)
C TectColer(color) D TextBgounrd(color)
Câu 24: Trong PASCAL, mở tệp để “ ghi “kết ta phải sử dụng thủ tục nào? A Reset(<biến tệp>); B Reset(<tên tệp>);
C Rewrite(<biến tệp>); D Rewrite(<tên tệp>);
Câu 25: Để đọc liệu từ tệp “Lop.DAT” thư mục ô đĩa C ta phải gán tệp với biến tệp f1 thủ tục
A assign(f1, ‘C:\ Lop.DAT’); B assign(‘f1,D:\ Lop.DAT’) C assign(f1, D:Lop.DAT) D assign(f1, ‘C: Lop.DAT’);
Câu 26: Trong Pascal để thực việc nối hai xâu: ‘abcd’ ‘efgh’ ta dùng lệnh sau:
A Insert(‘abcd’,’efgh’); B ‘abcd’ * ‘efgh’;
C ‘abcd’+’efgh’; D ‘abcd’ & ‘efgh’;
Câu 27: Để đưa trỏ tới vị trí cột x dịng y hình ta dùng thủ tục:
A GotoX,Y (x,.y); B Goto x,y (X,y);
C GotoX,y (Y,X); D Goto Xx,YY;
Câu 28: Cấu trúc chương trình gồm phần:
A B C D
Câu 29: Lượng liệu lưu trữ tệp:
A Không bị giới hạn mà phụ thuộc B Phải khai báo trước
vào dung lượng đĩa D Không lớn 255
C Không lớn 128
Câu 30: Để nhập liệu cho biến mảng chiều gồm 100 phần tử ta dùng đoạn lệnh: A for i:= to 100 writeln(A[i]); B for i:= to 100 readln(A[i]);