nhập vào mảng gồm n phần tử mảng nhỏ hơn 100pt mỗi phần tử nhỏ hơn 500 tính tổng các số có vị trí chẵn trong mảng
1 câu trả lời
Các số có vị trí chẵn trong mảng là các phần tử a[i] mà tại đó i chia hết cho 2 ⇒ i mod 2 = 0;
Code
Program ttong;
Uses crt;
Var a:array[1..1000] of integer;
i,n,s:longint;
BEGIN
clrscr;
Readln(n);
For i := 1 to n do Readln(a[i]);
s:=0;
For i := 1 to n do If i mod 2 = 0 then s:=s+a[i];
Writeln(s);
Readln;
END.
