Cho khai báo mảng và đoạn chương trình như sau:
Var a : array[0..50] of real ;
k
:= 0 ;
for i := 1 to 50 do
if a[i] > a[k] then k := i ;
Đoạn chương trình trên thực hiện công việc gì dưới đây?
A.A.
Tìm phần tử nhỏ nhất trong mảng;
B.B.
Tìm phần tử lớn nhất trong mảng;
C.C.
Tìm chỉ số của phần tử lớn nhất trong mảng
D.D.
Tìm chỉ số của phần tử nhỏ nhất trong mảng
Đáp án và lời giải
Đáp án:C
Lời giải:
Var a : array[0..50] of real ; {khai báo mảng a}
k := 0 ; {gán chỉ số 0 cho k}
for i := 1 to 50 do {vòng lặp chạy từ 1 đến 50}
if a[i] > a[k] then k := i ; {kiểm tra từ phần tử thứ 2 đến phần tử 50 so sánh với phần tử đầu và đưa ra chỉ số lớn nhất}