BÀI TẬP VÀ THỰC HÀNH 3

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]);