NGÂN HÀNG CÂU HỎI TRẮC NGHIỆM Câu hỏi: Một chương trình Pascal gồm có 3 phần: Phần tiêu đề - Phần khai báo - Phần thân chương trình.. Câu hỏi: Nếu n là một biến số nguyên Integer thì n
Trang 1NGÂN HÀNG CÂU HỎI TRẮC NGHIỆM
Câu hỏi: Một chương trình Pascal gồm có 3 phần:
Phần tiêu đề - Phần khai báo - Phần thân chương trình
Phần nào là phần bắt buộc phải có đối với mọi chương trình của Pascal?
Câu hỏi: Lựa chọn các phương án sau đây để điền vào phần cho đúng?
( =Hằng cận dưới Hằng cận trên;)
A Tên kiểu đoạn con
B Tên biến
C Tên kiểu liệt kê
Trang 2Câu hỏi: Hãy lựa chọn câu lệnh sai cho các dòng lệnh sau:
A Program Phuong Trinh Bac2;
Câu hỏi: Hãy lựa chọn câu lệnh đúng cho các câu lệnh sau:
A IF a>b THEN Write('a la so lon nhat');
B IF a>b THEN; Write('a la so lon nhat');
C IF a>b THEN Write('a la so lon nhat'); ELSE Write('b la so lon nhat');
D IF a>b THEN; Write('a la so lon nhat') ELSE Write('b la so lon nhat');
Câu hỏi: Nếu có dòng lệnh sau đây: X1:=(-b+sqrt(delta))/(2*a);
Khi đó khai báo biến X1 phải là biến dữ liệu kiểu?
Trang 3Câu hỏi: Các lệnh sau đây lệnh nào là lệnh đúng?
Câu hỏi: Chọn câu lệnh sai cho các câu lệnh sau:
Câu hỏi: Chọn câu lệnh sai cho các câu lệnh sau:
A Write('Nhap vao x, y:'); Readln(y,x);
B Write('Nhap vao x, y:'); Readln(x,y);
C Write('Nhap vao a, b, c:'); Readln(a,b,c);
D Write('Nhap vao a, b:'); Readln(a,b);
Câu hỏi: Có công thức tính như sau: Delta=b 2 -4ac Các dòng lệnh Pascal sau đây lệnh nào đúng?
Trang 4Câu hỏi: Nếu n là một biến số nguyên (Integer) thì n có thể được sử dụng vào trong các câu lệnh Pascal nào sau đây?
Câu hỏi: Nếu khai báo biến x thuộc kiểu Word (số nguyên mở rộng) thì x
có phạm vi biểu diễn nào sau đây?
Trang 5Câu hỏi: Số lần lặp được xác định như sau: (Giá trị cuối) - (Giá trị đầu) + 1:
Câu khẳng định trên được áp dụng cho vòng lặp nào sau đây?
D Repeat Until
Câu hỏi: "Giá trị đầu luôn nhỏ hơn giá trị cuối": Câu khẳng định trên được
áp dụng cho vòng lặp nào sau đây?
D T=Array ['A' 'Z'] Of Integer;
Câu hỏi: Có 1 mảng 2 chiều sau: R=Array [1 4,'A' 'E'] Of Char; Xác
Trang 6Câu hỏi: Một chương trình Pascal giải và biện luận phương trình bậc 2 Phần nào sau đây bắt buộc phải có?
A Phần khai báo và thân chương trình
B Phần tiêu đề và thân chương trình
C Phần thân chương trình
D Cả 3 phần
Câu hỏi: Khi viết chương trình Pascal có chương trình con thì sẽ hình thành 2 loại biến:
Biến toàn cục (Global) và biến cục bộ (Local) Khi đó biến cục bộ?
A Là biến được khai báo trong chương trình con
B Là biến được khai báo trong chương trình chính
C Là biến được khai báo trong chương trình chính và chương trình con
D Là biến không cần phải khai báo
Câu hỏi: Các khai báo hằng (CONST) nào sau đây đúng?
Câu hỏi: Nhóm lệnh nào sau đây đúng?
A Write('Nhap he so a,b:'); Readln(a,b);
B Write('Nhap he so a,b:'); Readln(ab);
C Write('Nhap he so a,b:'); Readln(a:b);
D Write('Nhap he so b,a:'); Readln(a,b);
Câu hỏi: Nếu S là một biến nguyên (Integer) Cách viết ra màn hình nào sau đây đúng?
Trang 7Câu hỏi: Có công thức: s= p * ( p − a ) * ( p − b ) * ( p − c )
Cách biểu diễn công thức bằng Pascal dưới đây biểu diễn nào đúng?
Câu hỏi: Nếu có hai chuỗi sau: 'Thanh Nam' "Thanh NAM"
A 'Thanh Nam' > 'Thanh NAM'
B 'Thanh Nam' = 'Thanh NAM'
C 'Thanh Nam' < 'Thanh NAM'
D Hai chuỗi trên không so sánh được
Câu hỏi: HoTen:='Le Dinh Trinh'; D:=Lenght(HoTen); Khi đó độ dài của
Trang 9Câu hỏi: Trong các kiểu dữ liệu dưới đây kiểu nào là kiểu dữ liệu không đếm được?
A Single
B Byte
C Word
D Integer
Câu hỏi: Trong vòng lặp For (Biến:=Giá trị đầu) To (Giá trị cuối) Do
Biến, Giá trịđầu, Giá trị cuối phải có kiểu dữ liệu nào?
A Kiểu vô hướng đếm được
Câu hỏi: Khẳng định nào sau đây đúng?
A VAR, BEGIN, end là các từ khoá của Pascal được khái niệm lập trình có
cấu trúc
B Các ký hiệu a, b, g, đđều thuộc bộ ký tự cơ bản của pascal
Trang 10C var, begin, integer, real là các từ khoá của pascal
D VAR, Var, vaR, var là các từ khoá khác nhau của Pascal
Câu hỏi: Tên nào đặt sai quy định của Pascal?
B Để lưu chương trình lên đĩa gõ phím F2 hoặc chọn File/Save
C Để tìm lỗi cú pháp của chương trình gõ phím Alt + F9 hay F9
Trang 11Câu hỏi: Để tính giá trị của biểu thức a
b x
2
−
=
chọn cách biểu diễn bằng Pascal nào sau đây?
Trang 12Câu hỏi: Khai báo kiểu liệt kê sau là sai vì:
Type Mau=(XANH, do, tim, Vang); vì:
A Tên "do" trùng với từ khoá
B Tên "XANH" viết chữ hoa
C Tên "Vang" có chữ V hoa
D Tên "tim" viết chữ thường
Câu hỏi: Khai báo nào sau đây đúng?
A Var x, y: Integer;
B Var x, y=Integer;
C Var x, y Of Integer;
D Var x, y := Integer;
Câu hỏi: Cho khai báo: Var ho, Ten: String[15]; Lệnh nào sau đây sai?
A Write('Ho ten la:'; Ho; Ten);
B Write('Ho ten la:' + Ho + Ten);
C Write('Ho ten la:', Ho, Ten);
D Write('Ho ten la:', Ho + Ten);
Câu hỏi: Cho i, j, k là 3 biến nguyên Để nhập dữ liệu cho lệnh:
Readln(i, j, k);
Cách nhập nào sau đây sai?
Trang 13A 3, 4, 5?
B 3 4 5?;
C 3? 4? 5?;
D Cả 3 đều sai
Câu hỏi: Lệnh nào sau đây in ra màn hình số lớn nhất giữa A và B?
A If A>B Then Write(A) Else Write(B);
B If A<B Then Write(A) Else Write(B);
C If A>B Then Readln(A) Else Readln(B);
D If A>B Then Write(B) Else Write(A);
Câu hỏi: Cho N là biến kiểu nguyên, chọn câu đúng cú pháp
A If N<10 Then Write('Nho hon 10') Else Write('Lon hon 10');
B If N<10 Then Write('Nho hon 10'); Else Write('Lon hon 10');
C If N<10 Write('Nho hon 10') Else Then Write('Lon hon 10');
D If N<10 Then N:=10 Else N>20 Write('N>20');
Câu hỏi: Kiểm tra 3 số a, b, c đều lớn hơn 1 thì in số 1 Chọn lệnh nào?
A if (a>1) and (b>1) and (c>1) Then Write(1);
B if (a>1) or (b>1) or (c>1) Then Write(1);
C if (a>1 and b>1 and c>1) Then Write(1);
D if a,b,c đều>1 Then Write(1);
Câu hỏi: Cho i là biến nguyên Sau khi thực hiện các lệnh:
Trang 15Câu hỏi: Cho S và i là biến nguyên Khi chạy chương trình:
A S:=1; For i:=1 To N Do S:=S*i;
B S:=0; For i:=1 To N Do S:=S*i;
C S:=1; For i:=1 To N Do S:=S*N;
D S:=1; For i:=1 To N Do S:=S+i;
Câu hỏi: Cho S=1 2 + 2 2 + +100 2 Chọn nhóm lệnh nào tính sai giá trị của S?
A S:=1; For i:=1 To 100 Do S:=S+i*i;
B S:=0; For i:=1 To 100 Do S:=S+i*i;
C S:=0; For i:=1 To 100 Do S:=S+Sqr(i);
D S:=0; For i:=100 DownTo 1 Do S:=S+i*i;
Câu hỏi: Cho S và i là biến kiểu nguyên Khi chạy đoạn chương trình:
Trang 16Để lệnh Readln(A); được thực hiện ít nhất một lần, phải điền vào chỗ lệnh
nào trong số các lệnh sau:
Trang 17Câu hỏi: Các khai báo nào sau đây đúng?
A Var A: Array[1 10] Of Integer;
B Var A= Array[1 10] Of Integer;
C Var A:= Array[1 10] Of Integer;
D Var A: Array[1,10] Of Integer;
Câu hỏi: Cho khai báo:
Var A:Array[1 4] Of Real; i:Integer; Để nhập dữ liệu cho A, chọn câu nào?
A For i:=1 To 4 Do Begin Write('Nhap A[',i,']:'); Readln(A[i]); End;
B For i:=1 To 4 Do Write('Nhap A[',i,']:'); Readln(A[i]);
C For i:=1 To 4 Do Readln('Nhap A[',i,']:');
D Write('Nhap A:'); Readln(A);
Câu hỏi: Cho khai báo:
Var A: Array[1 5] Of Integer; Chọn lệnh đúng
Trang 18C Integer
D String
Câu hỏi: Cho khai báo:
Var A: Array[1 4] of Integer; i:Integer;
Sau khi thực hiện các lệnh:
For i:=1 To 4 Do A[i]:=i;
For i:=1 To 4 Do A[i]:=A[i]+1;
Thì mảng A có giá trị là?
A A[1]=2, A[2]=3, A[3]=4, A[4]=5
B A[1]=1, A[2]=2, A[3]=3, A[4]=4
C A[1]=0, A[2]=1, A[3]=2, A[4]=3
D A[1]=1, A[2]=1, A[3]=1, A[4]=1
Câu hỏi: Khai báo nào sau đây đúng?
A Const n=2; m=3; Var A:Array[1 n, 1 m] Of Integer;
B Var A:Array[1 n, 1 m] Of Integer;
C Var n, m:Integer; A:Array[1 n, 1 m] Of Integer;
D Var A:Array[3,2] Of Integer;
Câu hỏi: Cho khai báo:
Var A:Array[1 2, 1 3] Of Real; i,j: Integer;
! Write('Nhap A[',i,j,']:'); Readln(A[i,j]);
C Write('Nhap A:'); Readln(A);
D For i:=1 To 2 Do Readln((A[i,j]);
Câu hỏi: Cho khai báo:
Var A:Array[1 2,1 3] Of Real;
i,j: Integer; Max:Real;
Trang 19! If Max < A[i,j] Then Max:=A[i,j];
D Max:=A[1,1];
! If Max < A[i,j] Then Max:=A[i,j];
Câu hỏi: Cho biến SS kiểu logic (Boolean) Lệnh nào làm cho SS có giá trị
if (i>5) then S:=5*3+(5-i)*2 else
if (i>3) then S:=5*i;
Trang 20Câu hỏi: Cho S và i là biến nguyên Khi chạy đoạn chương trình:
Câu hỏi: Khi chạy đoạn chương trình:
Var S,i: Integer;
Trang 21Câu hỏi: Cho khai báo:
Var Ho, Ten: String[15];
Lệnh nào sau đây sai:
A Write('Ho Ten la:';Ho;Ten);
B Write('Ho Ten la:'+Ho+Ten);
C Write('Ho Ten la:',Ho,Ten);
D Write('Ho Ten la:',Ho+Ten);
Câu hỏi: Khi chạy chương trình:
Var St:String; i,L:Integer;
Câu hỏi: Khai báo tiêu đề thủ tục nào sau đây đúng:
A Procedure TT(x:Integer; Var a:Real);
Trang 23Câu hỏi: Cho khai báo hàm:
Câu hỏi: Khi chạy chương trình:
Procedure T(a: Integer);
Câu hỏi: Khi chạy chương trình:
Procedure KK(a: Integer);
Trang 24Function F(k:Integer): String;
Câu hỏi: Khi chạy chương trình:
Var x,y: Real;
Câu hỏi: Khi chạy chương trình:
Var x,y: Real;
Trang 27Type SVien=Record
Ten,MaSo:String[10];
Chọn câu đúng:
A Var A:Array[1 10] Of SVien;
B Var A:Array[1 10] Of Record;
C Var A:Array[1 10] Of Ten;
Trang 28Var Ds:Array[1 10] of Sach;
Tien: Real; i:Integer;
Lệnh nào sau đây đúng:
A For i:=1 To 10 Do With Ds[i] Do Tien:=Tien+Gia;
B For i:=1 To 10 Do Tien:=Tien+Gia;
C For i:=1 To 10 Do Tien:=Tien+Ds[i].Masach;
D For i:=1 To 10 Do Tien:=Tien+Sach[i].Gia;
Câu hỏi: Cho khai báo:
Var F: File of Integer;
i,f,k: Integer;
Chọn câu có các lệnh đều đúng:
A Assign(F, 'T1.DAT'); Rewrite(F); Write(F, i, j, k);
B Assign(F, 'T1.DAT'); Rewrite(F); Write(F, i+j+k);
C Assign(F); Rewrite(F, 'T1.DAT'); Write(F, i, j, k);
D Assign(F, T1.DAT); Rewrite(F); Write(F, i, j, k);
Câu hỏi: Cho khai báo:
Trang 29A if x<=-1 then y:=2*x+1 else
! if x<=0 then y:=sin(x) else y:=x;
! if x>0 then y:=Sin(x) else y:=2*x+1;
Câu hỏi: Cho ch là biến ký tự, i biến nguyên Để gán giá trị cho biến ch thì lệnh:
Tương đương với nhóm lệnh nào:
A if i<0 then ch:='C' else
! if i<2 then ch:='A' else
! if i<=8 then ch:='B' else ch:='C';
B if i<0 then ch:='C' else
! if i<2 then ch:='A' else
! if i<=8 then ch:='B';
C if (i>=0) and (i<=2) then ch:='A';
! if (i>=3) and (i<=8) then ch:='B' else ch:='C';
if i<0 then ch:='C' else ch:='A';
Trang 30! if i<=8 then ch:='B' else ch:='C';
Câu hỏi: Khi chạy chương trình:
Procedure TraoDoi(a:integer; b:integer); Var z: Integer;
D Không có câu trả lời nào đúng
Câu hỏi: Khi chạy chương trình:
Var a,b: Integer;
Câu hỏi: Khi chạy chương trình:
Var x,y: Integer;
Trang 31C 34
D 54
Câu hỏi: Cho khai báo biến:
Var A: Array[3 5] of Integer;
Câu lệnh nào sau đây đúng:
A A[3]:=3;
B A[1]:=1;
C A[2]:=2;
D Không có lệnh nào đúng
Câu hỏi: Cho khai báo sau:
Var x,y: Integer;
Lệnh nào sau đây sai:
With A[i] Do x:=i; y:=i; End;
For i:=1 To 3 Do Write(A[i].x, A[i].y); End
Trang 33A CHUC ANH CHI THI TOT
B Chuc Anh Chi Thi Tot
C Chuc anh chi thi tot
D chuc anh chi thi tot
Câu hỏi: Khi chạy đoạn chương trình sau:
Trang 35D Không có trường hợp nào đúng
Câu hỏi: Trong Pascal để đánh dấu một khối bằng bàn phím Dùng tổ hợp phím nào dưới đây:
Trang 36Câu hỏi: Đoạn chương trình sau:
Var i,j,S: Integer;
Trang 37i:=9; If i<0 Then Writeln('So am') Else Case i mod 2 of
Trang 38Câu hỏi: Đoạn chương trình sau:
Var i,j,S: Integer;
Câu hỏi: Khi chạy chương trình:
Var x,y: Real;
Trang 39Câu hỏi: Khi chạy chương trình:
Var a,b: Integer;
Trang 40Câu hỏi: Trong Pascal dấu (;) (chấm phẩy) dùng để kết thúc câu lệnh Chỉ
ra câu lệnh sai khi dùng dấu chấm phẩy:
A Case a<b; do
B if (a>b) then Max:=a;
C if (a>b) then Max:=a else Max:=b;
D Không có câu lệnh nào sai
Câu hỏi: Khi chạy chương trình:
Trang 41End
Chương trình in ra:
A Chuc anh chi thi tot
B CHUC ANH CHI THI TOT
C Chuc Anh Chi Thi Tot
if (i>5) then S:=S*3+(5-i)*2 else
if (i>3) then S:=S*i;
if (i>5) then S:=S*3+(5-i)*2 else
if (i>3) then S:=S+i;
if (i>3) then S:=S*3+(5-i)*2 else
if (i>5) then S:=S+i;
End
Trang 43A HOM NAY THUC TAP
B Hom Nay Thuc Tap
C hom nay thuc tap
D Hom nay thuc tap
Câu hỏi: Cho các biến St kiểu chuỗi, k kiểu nguyên Sau khi gán:
St:='Sinh vien tin hoc ôc tin hoc';
Câu hỏi: Cho khai báo biến và khai báo tiêu đề của hàm F như sau:
Var x,S: Real; n:Integer;
FUNCTION F(y:Real; m:Integer): Real;
Lời gọi hàm nào dưới đây đúng:
Trang 44Var x,S: Integer; ch: Char;
Procedure TT(y:Integer; kytu:Char);
Lệnh gọi thủ tục nào sau đây đúng:
Procedure TT(Var a:Inteher; b:String);
Lệnh gọi thủ tục nào sau đây đúng:
A TT(x,St);
B TT(x+1,St);
C TT(10,St);
D y:=TT(St,x);