Câu hỏi:
17/06/2026 168Cho chương trình sau:
Program Chuong_Trinh;
Var a, b, S : byte;
Procedure TD(Var x : byte ; y : byte);
Var i : byte;
Begin
i := 5;
writeln(x,‘ ’, y);
x := x + i ;
y := y + i ;
S := x + y ;
Writeln(x,‘ ’, y);
End;
Begin
Write(‘nhập a và b : ’);
Readln(a, b);
TD(a,b);
Writeln(a,‘ ’, b, ‘ ’, S);
Readln;
End.
Trong chương trình trên có các biến toàn cục là:
A, x và y.
B. i.
C, a và b.
D, a, b, S.
Trả lời:
Giải bởi Vietjack
Biến toàn cục là biến được khai báo trong chương chính. Nó được sử dụng cho chương trình chính và các chương trình khác nữa. Vậy trong chương trình trên có các biến toàn cục là a, b, S.
Đáp án: D
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 5:
Đoạn chương trình sau có lỗi gì?
Procedure End (key : char ) ;
Begin
If key = ‘ q ’ then writeln( ‘ Ket thuc ’ )
End;
Câu 6:
Muốn khai báo x là tham số giá trị và y, z là tham số biến (x, y, z thuộc kiểu Byte) trong thủ tục “ViduTT” thì khai báo nào sau đây là sai?
Câu 7:
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à :
Câu 9:
Cho chương trình sau:
Program Chuong_Trinh;
Var a, b, S : byte;
Procedure TD(Var x : byte ; y : byte);
Var i : byte;
Begin
i := 5;
writeln(x,‘ ’, y);
x := x + i ;
y := y + i ;
S := x + y ;
Writeln(x,‘ ’, y);
End;
Begin
Write(‘nhập a và b : ’);
Readln(a, b);
TD(a,b);
Writeln(a,‘ ’, b, ‘ ’, S);
Readln;
End.
Trong chương trình trên có các tham số thực sự là:
