KT 15ph lan 4

Để khai bào thủ thục trong Pascal bắt đầu bằng từ khóa

• Program

• Procedure

• Function

• Var

Để khai bào hàm trong Pascal bắt đầu bằng từ khoa

• Program

• Procedure

• Function

• Var

Nói về cấu trúc của Thủ tục, khẳng định nào sau đây là không đúng?

• Phần đầu và phần thân nhất thiết phải có, phần khai báo có thể có hoặc không

• Phần khai báo có thể có hoặc không có tùy thuộc vào từng chương trình cụ thể

• Phần đầu có thể có hoặc không có cũng được

• Phần đầu nhất thiết phải có để khai báo tên Thủ tục

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

• Một thủ tục nhất thiết phải có tham số

• Một thủ tục nhất thiết phải có biến cục bộ

• Một thủ thục nhất thiết phải có tham số, không nhất thiết phải có biến cục bộ

• Một thủ tục có thể không có tham số và cũng có thể không có biến cục bộ

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

• Biến cục bộ là biến được dùng trong thủ tục chứa nó và trong chương trình chính

• Biến cục bộ là biến dùng trong chương chính

• Biến cục bộ là biến chỉ được dùng trong thủ tục chứa nó

• Biến toàn phần chỉ được sử dụng trong chương trình chính và không được sử dụng trong thủ tục

Mô tả nào dưới đây về Hàm là đúng?

• Phải trả lại kết quả

• Phải có tham số

• Trong hàm có thể gọi lại chính hàm đó

• Tất cả đều sai

Trong các cách sử dụng Thủ tục, cách nào là phù hợp nhất?

• Khai báo lại thủ tục và gọi nó mỗi khi cẩn sử dụng

• Khai báo thủ tục duy nhất một lần và gọi nó một lần duy nhất

• Chỉ cần khai báo

• Khai báo thủ tục duy nhất một lần và gọi nó trong thân chương trình mỗi khi muốn sử dụng.

Hãy chọn phương án ghép đúng. Cho thủ tục sau:

procedure p;

var n:integer;

begin

....

end;

Phạm vi của biến n là:

• Trong toàn bộ chương trình

• Trong nội bộ thủ tục p

• Trong toàn bộ tệp chương trình nguồn

• Tùy thuộc vào vị trí sử dụng của thủ tục p

Đoạn chương trình sau có lỗi gì?

Procdedure End(key: char);

begin

if key ='q' then writeln('Ket thuc')

end;

• Thiếu dầu ";" sau từ khóa begin

• Không thể câu lệnh If trong thủ tục

• Thiếu dầu ";" sau lệnh writeln

• "end" không thể dùng làm tên của thủ tục

Cho hàm sau:

Function foo(n:integer): boolean;

var i: integer;

begin

foo := false;

if n > 2 then for i:= 2 to n-1 do

if (n mod i = 0) then foo := true;

end;

• Kiểm tra n có phải là hợp số hay không

• In ra các ước số của n

• Cả 2 phát biểu trên đều sai

• Cả 2 phát biểu trên đều đúng