khá khó khăn trong việc lập trình

CT2:

Program Max_10;

Uses crt;

Var: i,Max:integer;

a: array[1..10] of integer;

Begin

Clrscr;

For i:= 1 to 10 do

Write('Hay nhap so thu ',i,' : '); Readln(a[i]);

Max:= a[1];

For i:= 2 to 10 do

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

Writeln('So lon nhat trong 10 phan tu ban vua nhap la ',Max);

Readln;

End.

Chất nào sau đây không tác dụng với dung dịch HCl?

A. Al

B. KMnO4

C. Cu(OH)2

D. Ag