Hỏi đáp về Kiểu mảng - Tin học 11

b. Xuất mảng vừa nhập.

c. In ra các phần tử âm và lẻ trong mảng.

d. Tính tổng các phần tử âm và lẻ.

a/ Xếp lại mảng đó theo thứ tự giảm dần.

b/ Nhập vào một số nguyên từ bàn phím. Chèn số đó vào mảng sao cho mảng vẫn có thứ tự giảm dần. (không được xếp lại mảng)

Ví dụ, với n=5, các số trong dãy là 7 8 4 2 10

Thì số lượng các số chẵn là 4, tổng các số chẵn là 24Số lượng các số lẻ là 1, tổng các số lẻ là 7

a, In ngược mảng vừa nhập sao cho biến nọ cách biến kia bởi dấu cách

b, Tính tổng các phần tử chẵn có chỉ số lẻ và in ra màn hình

c, In ra màn hình các số chia hết cho 2 và 5

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.