kiểm tra học kì 11p

Khai báo nào sau đây là đúng?

• Var a:string;

• Var a:string[1..50];

• Var c:string[0];

• Var c:array[10] of byte;

Các khai báo nào sau đây là đúng?

• Var A: array[1..1000] of longint;

• Var C: array[1..10000] of c;

• Var A: array[1..1000] of string[20];

• Var A: array[1...1000] of longint;

Đoạn chương trình sau dùng để làm gì?

Max:=a[1];

For i:=2 to n do

If a[i]>Max then Max:=a[i];

• Tìm giá trị lớn nhất của dãy số

• Tìm giá trị nhỏ nhất của dãy số

Đoạn chương trình sau để tìm giá trị lớn nhất của dãy số là đúng hay sai?

Max:=a[1];

For i:=1 to n do

If a[i]>Max then Max:=a[i];

• Đúng

• Sai

. Đoạn chương trình sau tìm giá trị nhỏ nhất của dãy số nguyên là đúng hay sai?

Min:=a[1];

For i:=2 to n do

If a[i]>Min then Min:=a[i];

• Đúng

• Sai

Đoạn chương trình sau tìm giá trị lớn nhất của dãy số nguyên là đúng hay sai?

Max:=a[n];

For i:=1 to n-1 do

If a[i]>Max then Max:=a[i];

• Đúng

• Sai

Đoạn chương trình sau tìm giá trị lớn nhất của dãy số nguyên là đúng hay sai?

Max:=a[n];

For i:=n down to 1do

If a[i]>Max then Max:=a[i];

• Đúng

• Sai

. Đoạn chương trình sau tìm giá trị lớn nhất của số nguyên là đúng hay sai?

Max:=low(longint);

For i:=1 downto n do

If a[i]>Max then Max:=a[i];

• Đúng

• Sai

Đoạn chương trình sau dùng để làm gì?

If a>b then max:=a else max:=b;

• Tìm giá trị lớn nhất của dãy số nguyên

• Tìm giá trị lớn nhất của 2 số a và b

Đoạn chương trình sau dùng để làm gì?

Min:=a;

If a>b then min:=b;

• Tìm giá trị lớn nhất của dãy số nguyên

• Tìm giá trị nhỏ nhất của 2 số a và b