Font size
WorksheetsÔN TẬP TIN HỌC TRẺ (LY THUYẾT - 02)
Total questions: 18
Worksheet time: 11mins
Để khai báo tên của một người em dùng kiểu dữ liệu nào sau đây?
Integer
Char
Boolean
String
Để khai báo dữ liệu kiểu logic (True/False) em dùng kiểu dữ liệu nào sau đây?
Integer
Char
Boolean
String
Kiểu dữ liệu nào có miền giá trị tử -32768 đến 32767?
Integer
Longint
Real
Char
Kết quả của t sau khi thực hiện đoạn lệnh sau bằng bao nhiêu?
t = 15 mod 1;
0
15
3
14
Kết quả của t sau khi thực hiện đoạn lệnh sau bằng bao nhiêu?
t = 15 div 4;
0
15
3
14
Kết quả của t sau khi thực hiện đoạn lệnh sau bằng bao nhiêu?
t = 15 mod 2;
1
15
3
14
Giá trị của i sau khi thực hiện đoạn trương trình sau bằng bao nhiêu?
For i:=1 to 5 do
Write(i:5);
(a)
Giá trị của t sau khi thực hiện đoạn trương trình sau bằng bao nhiêu?
t:=0;
For i:=1 to 5 do
t:=t+i;
(a)
Đoạn chương trình sau in ra màn hình bao nhiêu dòng chữ chào bạn?
i:=0;
While (i<5)
begin
Write('Chao bạn!');
End;
0
1
5
vô hạn!
Giá trị của i sau khi thực hiện đoạn chương trình bằng bao nhiêu?
i:=1;
While (i<6)
begin
i:=i+1;
End;
1
5
6
i
Đoạn chương trình khai báo biến mảng sau, khi đó a gồm tối đa bao nhiêu phần tử?
Var a: array[1..50] of integer;
1
50
100
32768
a:=6; b:=4;
While a<>b do
Begin
if a>b then a:=a-b
else b:=b-a;
End;
Sau khi thực hiện đoạn trương trình trên giá trị của a và b sẽ như nào?
a=2; b=2;
a=6; b=4;
a=6; b=6;
a=4; b=4;
n:=568; s:=0;
While n<>0 do
Begin
d:=n mod 10;
s:=s+du;
n:=n div 10;
End;
Sau khi thực hiện đoạn trương trình trên giá trị của s bằng bao nhiêu?
(a)
Var kt:boolean;
Function ktnt(K:integer):boolean;
Begin
ktnt:=true;
for i:=2 to k div 2 do
if k mod i =0 then
begin
ktnt:=false;
break;
end;
End;
BEGIN
kt:=ktnt(9);
END.
Đoạn trương trình trên giá trị của kt như thế nào?
True
False
9
2
Truy xuất dữ liệu biến kiểu mảng như nào?
Qua tên biến
Qua chỉ số
Tên biến và chỉ số
tên_biến[Chỉ_số]
Giá trị
i:=1;
While i<=5 do
Begin
Write('Chao bạn!');
i:=i+2;
End;
Đoạn chương trình trên in ra màn hình mấy dòng chữ 'Chao bạn'?
0
1
3
5
a:=5; b:=9;
If a> b then Write(a)
else Write(b);
Đoạn chương trình trên in ra màn hình nội dung gì?
5
9
a
b
a:=15; b:=12;
If a> b then Write(a)
Đoạn chương trình trên in ra màn hình nội dung gì?
15
12
a
0
