On Tap moi nhat ngay 7 thang 12

Để mô tả việc lặp đi lặp lại một số thao tác (hoặc câu lệnh) trong một thuật toán ta có thể dùng cấu trúc lặp.. Có thể dùng cấu trúc lặp với số lần biết trước để thay thế cho lặp với số[r]

(1)

Character Setting!Invalid Character Setting!Invalid Character Setting!Invalid Character Setting

Mã đề: 153 Câu 1.

Trong ngơn ngữ lập trình Pascal, để in xâu hình theo thứ tự ngược lại ký tự trong xâu

(Ví dụ 'abcd' in 'dcba'), đoạn chương trình sau thực việc này? A. For i:=1 to length(s) div write(s[i]); B. For i:=1 to length(s) write(s[i]); C. For i:=length(s) downto write(s[i] ); D. For i:=length(s) downto write(s); Câu

Trong cú pháp cấu trúc rẽ nhánh dạng đủ <câu lệnh 2> thực nào? A Câu lệnh thực hiện; B Biểu thức điều kiện đúng;

C. Biểu thức điều kiện sai; D. Câu lệnh thực hiện;

Câu 3.

Hãy cho biết giá trị biến x:=copy('BOT Cai Lay',5,3);

A 'Cai' B 'Cai ' C ' Cai' D ' Cai ' Câu

Hãy cho biết giá trị biến x:=copy('Toi thay hoa vang tren co xanh',9,9);

A. ' hoa vang ' B. 'hoa vang' C ' hoa vang' D. 'hoa vang '

Câu 5.

Cho biểu thức dạng toán học sau:41 a2 b2 ; chọn dạng biểu diễn tương ứng Pascal: A 1/4sqr(a*a-b*b) B 1/4sqrt(a*a-b*b) C 1/4* sqrt(a*a-b*b) D 1/4*spr(a*a-b*b) Câu

Phát biểu sau đúng:

A Hai xâu hai xâu hoàn toàn giống B. Hai xâu số phần tử chúng khác C Hai xâu có độ dài

D Hai xâu có số phần tử Câu 7.

Trong ngơn ngữ lập trình Pascal, để xóa ký tự cuối xâu ký tự S ta viết :

A Delete(S,1,length(S)); B Delete(S, 1,0 ); C Delete(S, 1, 1); D Delete(S, length(S),1); Câu

Chọn phát biểu sai

A Hàm Mod() hàm chia lấy phần dư B Hàm exp() hàm lũy thừa số e

C Hàm Sqr() hàm lấy bậc hai D. Hàm Abs() hàm lấy giá trị tuyệt đối

Câu 9.

Trong ngôn ngữ lập trình Pascal, sau chương trình thực xong đoạn chương trình sau, giá trị của biến S là?

S := 'Ngon Ngu; Delete(S,1,2); Insert('Q',S,1);

A ' Qon Ngu ' B 'Qon Ngu' C 'Q on Ngu ' D ' Qon Ngu' Câu 10

Trong Pascal xâu gì

A. Tập hợp kí tự bảng mã ASCII

B Xâu xem kiểu mảng chiều mà phần tử số C Tập hợp kí tự bảng chữ tiếng Anh

D. Tập hợp kí tự bảng chữ tiếng Việt Câu 11.

(2)

A 13 B -1 C D -6

Câu 12.

Trong ngôn ngữ lập trình Pascal, để tìm vị trí xuất xâu 'abc' xâu s ta viết bằng cách cách sau?

A S1:='abc'; I:=pos(s1,'abc'); B I:=pos(abc,s); C I:=pos(s,'abc'); D I:=pos('abc',s); Câu 13.

Cho biết kết chương trình sau? Var a,b: integer;

begin

a:= 10; b:= -10;

if a<=b then write(-1) else write (1); end

A B 10 C -1 D 10

Câu 14

Trong ngơn ngữ lập trình Pascal, khai báo khai báo sau SAI khai báo xâu kí tự ?

A. var S:string; B. var S:string[1]; C var S:string(255); D. var S:string[100];

Câu 15.

Trong ngôn ngữ lập trình Pascal, để in xâu hình theo thứ tự ngược lại ký tự trong xâu

(Ví dụ 'abcd' in 'dcba'), đoạn chương trình sau thực việc này?

A. For i:=1 to length(s) write(s[i]); B. For i:=length(s) downto write(s);

C For i:=1 to length(s) div write(s[i]); D For i:=length(s) downto write(s[i] ); Câu 16

Cho đoạn chương trình sau: S:=5;

for i:=1 to 10 S:=S+0; Cho biết S=?

A S=15 B S=20 C S=10 D S=5

Câu 17.

Phạm vi biểu diễn giá trị kiểu liệu INTEGER bao nhiêu

A đến 255 B -215 đến 215-1 C đến 216-1 D -215 đến 215-1

Câu 18

Trong ngơn ngữ lập trình Pascal, sau chương trình thực xong đoạn chương trình sau, giá trị của biến S ?

S := 'Noel 2017'; Delete(S,6,2); Insert('nam',S, 5);

A Noelnam 17 B Noel nam 17 C Noelnam 17 D Noel nam17

Câu 19.

Trong ngôn ngữ lập trình Pascal, hai xâu ký tự so sánh dựa trên: A Mã ký tự xâu từ phải sang trái;

B. Mã ký tự xâu từ trái sang phải; C Độ dài thực hai xâu;

D Độ dài tối đa hai xâu; Câu 20.

Khẳng định mảng chiều?

A Mảng có số phần tử khơng đếm B Một mảng có nhiều tên khác

C Các phần tử mảng có kiểu D. Các phần tử mảng khác kiểu

Câu 21.

Trong ngôn ngữ lập trình Pascal, câu lệnh sau ĐÚNG?

(3)

Character Setting!Invalid Character Setting!Invalid Character Setting!Invalid Character Setting C If <điều kiện>; then <câu lệnh>; D If <điều kiện>, then <câu lệnh>;

Câu 22.

Trong ngơn ngữ lập trình Pascal, sau chương trình thực xong đoạn chương trình sau, giá trị của biến S là?

S := 'Thi hoc ky 1'; Delete(S, 8, 5); Insert('va',S, 4);

A. Thi vahoc B Thiva hoc C. Thi va hoc D. Thivahoc

Câu 23.

Với lệnh sau dùng để in giá trị M(M kiểu số thực) hình với độ rộng có chữ số thập phân?

A. Write(M;5;2); B Write(M:5:2); C. Write(M:2:5); D. Write(M;2;5);

Câu 24.

Trong NNLT Pascal, chương trình sau có kết gì? If (5 mod 2=0) then write ('Sai'); Else write ('Dung');

A Sai B Dung C D Chương trình bị lỗi

Câu 25

Trong hàm thủ tục sau, hàm thủ tục cho kết số nguyên?

A insert(S1,S2,vt) B Pos(S1,S2) C copy(S,vt,n) D delete(s,vt,n)

Câu 26.

Chọn phát biểu sai phát biểu sau :

A Tùy trường hợp cụ thể (khi mơ tả thuật tốn), ta biết trước số lần lặp, ta không cần không xác định trước số lần lặp thao tác

B. Có thể dùng cấu trúc lặp với số lần chưa biết để thay cho lặp với số lần biết

C Để mô tả việc lặp lặp lại số thao tác (hoặc câu lệnh) thuật tốn ta dùng cấu trúc lặp

D. Có thể dùng cấu trúc lặp với số lần biết trước để thay cho lặp với số lần chưa biết Câu 27.

Cho x biến nguyên, y biến thực Câu lệnh sau SAI:

A y := y*3.0; B x := x div 3; C y:= y/3; D x:= x+3.0; Câu 28

Để mô tả cấu trúc rẽ nhánh thuật tốn, nhiều ngơn ngữ lập trình bậc cao dùng câu lệnh IF - THEN, sau IF <điều kiện> Điều kiện

A Biểu thức số học; B Biểu thức quan hệ; C Một câu lệnh; D Biểu thức lôgic; Câu 29

Cho đoạn chương trình sau: a=2017;

a:=a mod 1;

If(a<>1) then x:=2016 Else x:= 2015; Write('x= ', x);

Kết ?

A. x = B. x = 2015 C. x = D. x = 2016

Câu 30

Hãy chọn cách dùng ĐÚNG Muốn dùng biến X lưu giá trị lớn giá trị hai biến A, B có thể dùng cấu trúc rẽ nhánh sau :

A. If A < B then X := B else X := A; B. If A > B then X := A;

C. If A < B then X := A else X := B; D. X := B; if A < B then X := A; Câu 31

Đoạn chương trình sau thực cơng việc gì? S:=0; N:=10;

For i:= to N if A[i]>0 then S:=S +1;

(4)

Character Setting!Invalid Character Setting!Invalid Character Setting!Invalid Character Setting B Không thực việc công việc

C. Tính tổng phần tử số dương mảng D Đếm số phần tử mảng A;

Câu 32

Trong ngơn ngữ lập trình Pascal, thủ tục Insert(a,b,n) thực cơng việc gì? A Chèn thêm xâu a vào xâu b vị trí n b;

B. Chèn thêm xâu a vào xâu b vị trí n a; C Chèn thêm xâu b vào xâu a vị trí n b; D Chèn thêm xâu b vào xâu a vị trí n a; Câu 33.

Đoạn chương trình sau thực cơng việc gì? S:=0; N:=10;

For i:= to N if A[i]>0 then S:=S +1;

A Không thực việc công việc B. Đếm số phần tử mảng A;

C Đếm phần tử số dương mảng; D Tính tổng phần tử số dương mảng Câu 34

Lệnh Write( '5 x = ' , 5*4 ) ; viết hình :

A. x = 5*4 B. x = 20 C. 20 = * D. 20 = 20

Câu 35 Trong ngơn ngữ lập trình Pascal xâu ký tự không chứa ký tự gọi là:

(5)

Đáp án mã đề: 153

(6)

Đáp án mã đề: 153

01 - - = - 10 ; - - - 19 - / - - 28 - - - ~

02 - - = - 11 - - - ~ 20 - - = - 29 - - - ~

03 ; - - - 12 - - - ~ 21 ; - - - 30 ;

-04 - - = - 13 ; - - - 22 - / - - 31 ;

-05 - - = - 14 - - = - 23 - / - - 32 ;

-06 ; - - - 15 - - - ~ 24 - - - ~ 33 =

-07 - - - ~ 16 - - - ~ 25 - / - - 34 /

-08 - - = - 17 - / - - 26 - - - ~ 35 - - - ~