Hãy điền vào các vị trí ...để hoàn thiện chương trình sau
Var i,n,s: integer;
A:array[1..100] of integer;
Begin
Writeln('hay nhap so phan tu cua mang ');
Readln(n);
For i:=1 to n do
Begin
Writeln('hay nhap gia tri phan tu ',i);
Readln(.....);
For i:=1 to....do
S:=.........;
Writeln('tong la', S);
Readln;
End.
Loga
Sinh Học lớp 12
