Question

Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau dùng để làm gì? Var a:array[0..50] of real; i, k:byte; Begin k:= 0; for i:= 1 to 50 do if a[i] > a[k] then k:= i; writeln(k); End. A. Đếm số phần tử trong mảng a là số chẵn. B. Đếm số phần tử trong mảng a là số lẻ. C. Tính tổng các phần tử trong mảng a. D. Đếm các phần tử có trong mảng a.

Answer 1

Chọn D nhé bạn

Answer 2

Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau dùng để làm gì? Var a:array[0..50] of real; i, k:byte;

Begin

k:= 0;

for i:= 1 to 50 do if a[i] > a[k] then k:= i;

writeln(k);

End.

A. Đếm số phần tử trong mảng a là số chẵn.

B. Đếm số phần tử trong mảng a là số lẻ.

C. Tính tổng các phần tử trong mảng a.

D. Đếm các phần tử có trong mảng a.