WorksheetsBÀI TẬP VÀ THỰC HÀNH 3
Total questions: 10
Worksheet time: 5mins
Trong ngôn ngữ lập trình Pascal, về mặt cú pháp câu lệnh nào sau đây là đúng?
Type mang=array[1-100] of char;
Type 1chieu=array[1..100] of char;
Type mang1c=array(1..100) of char;
Type mang1c=array[1..100] of char;
Phát biểu sau đây đúng hay sai: Mảng một chiều là tập hợp các phần tử có cùng kiểu
Đúng
Sai
Chọn cú pháp tham chiếu phần tử mảng
Tên biến mảng (Chỉ số)
Tên biến mảng, Chỉ số
Tên biến mảng {Chỉ số}
Tên biến mảng [Chỉ số]
Phát biểu sau đúng hay sai: Khi khai báo biến mảng một chiều thì kiểu phần tử của mảng chỉ có thể là số nguyên
Đúng
Sai
Đúng nếu người lập trình dùng số nguyên lớn
Đúng nếu người lập trình dùng số nguyên nhỏ
Chỉ số đầu, cuối trong cú pháp khai báo biến mảng phải thõa mãn
Chỉ số đầu > Chỉ số cuối
Chỉ số đầu >= Chỉ số cuối
Chỉ số đầu <> Chỉ số cuối
Chỉ số đầu <= Chỉ số cuối
Hàm chuẩn Random(n) có ý nghĩa:
Cho giá trị là số nguyên ngẫu nhiên trong đoạn từ 0 đến n-1
Cho giá trị là số nguyên ngẫu nhiên trong đoạn từ 0 đến n
Cho giá trị là số nguyên ngẫu nhiên trong đoạn từ -n đến n
Cho giá trị là số nguyên ngẫu nhiên trong đoạn từ -(n-1) đến n-1
Đoạn chương trình sau thực hiện công việc gì?
s:=0;
for i:=1 to n do
if a[i] mod k = 0 then s:=s +a[i];
Tính tổng các phần tử của mảng A
Tính tổng các phần tử của mảng A là bội số của một số nguyên K cho trước
Tính tổng các phần tử của mảng A không chia hết cho số nguyên K cho trước
Tính tổng các phần tử của mảng A có giá trị bằng số nguyên K cho trước
Đoạn chương trình nào tính tổng các phần tử chẵn của mảng các số nguyên A gồm N phần tử?
s:=0;
For i:= 1 to n do
if a[i] mod 2 = 0 then s:=s +a[i];
s:=0;
For i:= 1 to n do
if a[i] mod 2 <> 0 then s:=s +a[i];
s:=0;
For i:= 1 to n do
if a[i] div 2 = 0 then s:=s +a[i];
s:=0;
For i:= 1 to n do
if a[i] div 2 <>0 then s:=s +a[i];
Chọn khai báo mảng để lưu trữ nhiệt độ trung bình của một tháng có 30 ngày đúng nhất
Var NhietDo:Array[1..30] Of Integer;
Var NhietDo:Array[1..30] Of Real;
Var NhietDo:Array[1..30] Of Word;
Var NhietDo:Array[1..30] Of Byte;
Để nhập từ bàn phím mảng 1 chiều A gồm N phần tử là các số nguyên ta dùng đoạn lệnh nào sau đây?
For i:= 1 to n do readln(a[i]);
For i:= 1 to n do
write('nhap phan tu thu ',i,':');
readln(a[i]);
For i:= 1 to n do
begin
write('nhap phan tu thu ',i,':');
end;
readln(a[i]);
For i:= 1 to n do
begin
write('nhap phan tu thu ',i,':');
readln(a[i]);
