Tin 11 - HK2

Cho khai báo sau :

Var a :array[0..16] of integer ;

Câu lệnh nào dưới đây sẽ in ra tất cả các phần tử của mảng trên ?

• For k:=1 to 16 do write(a[k]);

• For k:=16 downto 0 do write(a[k]);

• For k:=16 downto 0 write(a[k]);

• For k:= 0 to 15 do write(a[k]);

S1 = ‘tin hoc cho moi nguoi’

Pos(‘o’,S1) cho kết quả là?

• 5

• 6

• 7

• 8

Đoạn chương trình sau in ra kết quả nào ?

Program Welcome ;

Var a : string[10];

Begin

a := ‘tinhoc’;

writeln(length(a));

End.

• 5

• 6

• Lỗi

• 8

Khai báo phần đầu một hàm là:

• Function <tên hàm> [(<danh sách các tham số>)] ;

• Function <tên hàm> ;

• Procedure <tên hàm> [(<danh sách các tham số>)] : <kiểu dữ liệu>;

• Function <tên hàm> [(<danh sách các tham số>)] : <kiểu dữ liệu>;

Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau (kiểu xâu) thực hiện công việc gì ?

S1 := ‘ ‘ ;

For i :=1 to length(S) do

S1 :=S1 + upcase(S[i]);

• Tạo xâu S1 là chữ in hoa từ xâu S

• Tạo xâu S1 là chữ thường từ xâu S

• Tạo xâu S1 từ xâu S

• Tạo xâu S1 là các kí tự chữ số

Các biến dùng chung cho toàn bộ chương trình được gọi là?

• Tham số thực sự.

• Biến cục bộ.

• Tham số hình thức

• Biến toàn cục.

Khẳng định nào sau đây là đúng?

• Các thủ tục (nếu có) phải được khai báo ngay từ đầu của chương trình chính.

• Các thủ tục (nếu có) phải được khai báo sau Begin của chương trình chính.

• Các thủ tục (nếu có) được khai báo bất kỳ trong chương trình chính.

• Các thủ tục (nếu có) phải được khai báo và mô tả ngay sau phần khai báo biến và trước Begin của chương trình chính.

Hãy chọn phương án ghép đúng. Cho xâu S là ‘Hanoi-Vietnam’. Kết quả của hàm Length(S) là

• 12

• 14

• 13

• 15

Cho str là một xâu kí tự, đoạn chương trình sau thực hiện công việc gì?

for i := length(str) downto 1 do write(str[i]) ;

• In xâu ra màn hình;

• In từng kí tự xâu ra màn hình;

• In từng kí tự ra màn hình theo thứ tự ngược;

• In từng kí tự ra màn hình theo thứ tự ngược, trừ kí tự đầu tiên;

Trong ngôn ngữ lập trình Pascal, đoạn chương trình (mảng một chiều) sau thực hiện công việc gì ?

S := 0 ;

For i := 1 to n do

If (a[i] mod 3 =0) or (a[i] mod 5 = 0) then S :=S+a[i] ;

• Tính tổng các phần tử trong mảng chia hết cho 3 hoặc chia hết cho 5

• Tính tổng các phần tử chia hết cho 5

• Tính tổng các phần tử trong mảng

• Tính tổng các phần tử chia hết cho 3