Trên màn hình xuất hiện chữ số 1 nếu ta nhập vào từ bàn phím số 1.. Trên màn hình xuất hiện chữ số 1.. Trên màn hình xuất hiện chữ số 1 nếu ta nhập vào từ bàn phím số 1 và xuất hiện chữ
Trang 1SỞ GIÁO DỤC VÀ ĐÀO TẠO
MÔN Tin Hoc 11
Thời gian làm bài:45 phút;
(25 câu trắc nghiệm)
Họ, tên học sinh:
Lớp: Mã đề thi 076
Đ/án
Câu 1: Cho đoạn lệnh : St=’Kiem tra tin học 11 hoc ki II’;
n:= Pos(‘hoc’,st);
Hãy cho biết giá trị của n là bao nhiêu
Câu 2: Procedure Trao_doi (X: Integer;Y: integer);
Var Z: integer;
begin Z:=X ;X:=Y; Y:= Z; end;
Giả sử A=10, B=20, sau lời gọi thủ thục Trao_doi (A,B) trên có lệnh Writeln(A,B) theo em giá trị nào sẽ được hiển thị trên màn hình
Câu 3: Readln(a);
If a = 1 then Writeln(a) else writeln(‘1’);
Sau khi máy tính thực hiện đoạn chương trình trên thì:
A trên màn hình không có gì.
B Trên màn hình xuất hiện chữ số 1 nếu ta nhập vào từ bàn phím số 1.
C Trên màn hình xuất hiện chữ số 1.
D Trên màn hình xuất hiện chữ số 1 nếu ta nhập vào từ bàn phím số 1 và xuất hiện chữ số khác 1 nếu ta nhập vào chữ số khác 1 từ bàn
phím
Câu 4: Cho S1=‘Ha Noi’ và S2= ‘Ha Tinh’ Kết luận nào sau đây là đúng:
Câu 5: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
Câu 6: Cho St1:=’Ha noi dem tro gio’; và St2:=’Ha Noi’; Khi ta gán n:=Pos(St2,St1); thì kết quả của n là:
Câu 7: Sau khi chạy đoạn chương trình sau, thì sẽ đưa ra màn hình giá trị là bao nhiêu ?
a:=2; b:=4; x:=2 ;
If a + B >= 6 then x := x + a + b; Write (x);
Câu 8: Cho đoạn lệnh : S=’Kiem tra lập trinh tin học 11’;
Pos(‘Tin hoc’,st);
Hãy cho biết giá trị của hàm pos là bao nhiêu
Câu 9: Chương trình dịch bao gồm:
Câu 10: Đoạn chương trình sau đây thực hiện công việc gì?
For i:= 1 to Length(st) do
If (st[i]>=’0’) and (st[i]<=’9’) then Write(st[i]);
A Đưa ra tất cả các kí tự không phải là các chữ số trong xâu st.
B Đưa ra tất cả các kí tự là các chữ số trong xâu st.
C Là một công việc khác.
D Đưa ra tất cả các kí tự của xâu st.
Câu 11: Trong Pascal mở tệp để đọc dữ liệu ra thì ta sử dụng lệnh:
A Rewrite(<tên tệp>); B Reset(<tên tệp>);
C Rewrite(<tên biến tệp>); D Reset(<tên biến tệp>);
Câu 12: Khái báo mảng một chiều nào sau đây là đúng:
A Type mang=array[1 20] of Integer;
Var A:dayso
C Type dayso=array[1 20] of Integer;
Câu 13: Trong các khai báo sau khai báo nào là khai báo đúng
A Var so_nguyen:byte; B Var so_nguyen; sothuc: real;
C Var x:Integer, y:byte; D Var so nguyen:Integer;
Trang 1/2 - Mã đề thi 076
Trang 2Câu 14: Cho đoạn chương trình:
Begin z:= x; x: =y; y:= z; End.
Đoạn chương trình trên thực hiện việc:
A giá trị x, y không thay đổi, biến z nhận giá trị bằng y B giá trị x, y không thay đổi, biến z nhận giá trị bằng x.
C thay đổi giá trị x, y; x nhận giá trị y còn y nhận giá trị z D thay đổi giá trị x, y; x nhận giá trị y còn y nhận giá trị x.
Câu 15: S: = 0;
For i:= 1 to 5 do Begin s:= s + i ; Writeln(s); readln; End;
Nhận xét nào đúng nhất về đoạn chương trình trên:
A tính tổng từ 1 đến 5 và in ra trên màn hình các số là tổng của s+i.
B tính tổng từ 1 đến 5 và in ra trên màn hình số tổng s
C đoạn chương trình trên chạy mãi không dừng.
D tính tổng từ 1 đến 5 và in ra trên màn hình lần lượt các số là tổng của s+i sau mối lần ta ấn phím Enter.
Câu 16: Cho đoạn chương trình sau:
S:=10; For i:=1 to n do
Begin Write('Nhap phan tu thu ',i,': '); Readln(A[i]); end;
S:=S+A[i];
Đoạn chương trình trên thức hiện công việc:
A Tính tổng các chỉ số của mảng một chiều B Tính tổng các phần tử của mảng một chiều.
C Tính tổng các số từ 1 đến n D Tính tổng của S và A[n]
Câu 17: Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện việc nào trong các việc :
Max:=a[1]; For i:= 2 to n do
If max<a[i] then max:=a[i];
A Không thực hiện việc nào trong 3 việc trên; B tìm giá trị lớn nhất của mảng A;
C Đếm số phần tử của mảng A; D Tính tổng các phần tử của mảng một chiều;
Câu 18: Procedure Trao_doi (var A: Integer; B: integer);
Var C: integer;
begin C:=B ; B:=A; A:= C; end;
Giả sử x1=50, x2 =100, sau lời gọi thủ thục Trao_doi(x1,x2) trên có lệnh Writeln(A,B) theo em giá trị nào sẽ được hiển thị trên màn
hình
Câu 19: Writeln(‘nhap gia tri x lớn hon 100:’); readln(x);
While x > 100 do Begin Writeln(‘nhap lai gia tri x:’); readln(x); End;
Khi gặp đoạn chương trình trên:
A ta phải nhập giá trị nhỏ hơn hoặc bằng 100 thì chương trình mới chạy tiếp.
B đoạn chương trình trên có lỗi máy tính gặp sẽ chạy mãi không dừng.
C máy tính yêu cầu nhập một giá trị bất kì vào từ bàn phím.
D ta phải nhập giá trị lớn hơn 100 thì chương trình mới chạy tiếp.
Câu 20: While 7 >10 do Begin Writeln(‘nhap gia tri x:’); readln(x); End;
Đoạn chương trình trên:
A đoạn chương trình bị lỗi không chạy được B chạy không thoát ra được.
C không làm gì cả D nhập giá trị cho biến x.
Câu 21: Trong Pascal, về mặt cú pháp thì câu lệnh nào sau đây là sai?
A i:=100; while i>=1 do Begin s:=s+i; i:=i-1; end; B For i:=100 downto 1 do If i mod 2 = 0 then s:=s+1;
C For i:=1 to 100 do
If i mod 3= 0 then s:=s+1; else n:=n+1; D For i:=1 to 100 do writeln(i:4);
Câu 22: Cho đoạn chương trình sau thực hiện công việc gì?
For i:=100 downto 2 do
begin
If i mod 2 = 0 then Writeln(i);
i:=i+1;
end;
A viết ra các chữ số không chia hết cho 2 từ 2 đến 100 B Viết ra tất cả các số chia hết cho 2 từ 2 đến 100.
C Viết ra liên tục các con số 100 D Không thực hiện được câu lệnh.
Câu 23: Cho S1= ‘Xau ki tu.’ và S2= ‘Xau ki tu’ Kết luận nào sau đây là đúng:
A Tất cả đều sai B S1=S2 C S1>S2 D S1<S2
Câu 24: Writeln(‘ Nhap gia tri x, y, z’); Readln(x,y,z);
A Viết ra dòng chữ: Nhap gia tri x, y, z và con trỏ màn hình được đặt ngay sau chữ z.
B Viết ra dòng chữ: Nhap gia tri x, y, z và đưa con trỏ màn hình xuống dòng dưới dừng chương trình lại đợi nhập giá trị x, y, z.
C Viết ra dòng chữ: Nhap gia tri x, y, z và con trỏ màn hình đặt ngay sau chữ z dừng chương trình lại đợi nhập giá trị x, y, z.
Câu 25: For i : = 1 to 10 do begin s: = s + i; i: = i – 1; End;
Đoạn chương trình trên;
A chạy mãi không dừng B không có tác dụng gì.
C tính tổng từ 1 đến 10 D bị lỗi, chương trình có đoạn lệnh trên không chạy được.
- HẾT
Trang 2/2 - Mã đề thi 076