NEW
Font size
WorksheetsTIN11_KTTX1
Total questions: 10
Worksheet time: 5mins
Chọn khai báo biến mảng đúng sau đây?
var A: array [1..100] of integer;
var A: array [1...100] of integer;
var A: array[1..100] integer;
var A: array [1.5..100] of integer;
Cho khai báo: var A: array[1..100] of integer;
Tham chiếu đến phần tử thứ 5 của mảng A được viết là:
A(5)
A[5]
A{5}
A<5>
Cho đoạn chương trình sau, cho biết kết quả in ra màn hình nếu mảng A nhập các phần tử (5; 4; 12; 45; 7)
var A: array[1..100] of integer; s, i: integer;
begin
for i:= 1 to 5 do readln(A[i]);
s:=0;
for i:= 1 to 5 do s:= s+A[i];
write(s);
end.
5
73
s
0
cho xâu S= 'va ngay nao do'; hàm length(s) cho phép trả về kết quả
13
0
10
14
Cho xâu S1:= 'hanh'; s2:= 'phuc';
cho biết kết quả trả về khi gọi thủ tục Insert(s1, s2, 2);
'haphucnh'
'hphucanh'
'phanhhuc'
'phhanhuc'
Cho xâu S:= 'hanh phuc';
Kết quả trả về khi gọi thủ tục Delete(S, 6,2);
'hanh uc'
'hanh'
'phuc'
'hanhhuc'
cho xâu S:= 'Khue moc lang';
Kết quả trả về của hàm pos('a', S) là:
11
12
10
0
Câu lệnh gắn tên tệp 'baitap.inp' cho biến tệp f1 nào sau đây là đúng
assign (f1, baitap.inp);
assign (baitap.inp' , f1);
assign (f1, "baitap.inp");
assign (f1, 'baitap.inp');
Câu lệnh mở tệp f để đọc nào sau đây là đúng
reset(f);
open(f);
read(f);
rewrite(f);
Hàm trả về giá trị true nếu con trỏ đang ở cuối tệp f là:
eof(f)
eoln(f)
close(f);
oef(f)
