15 - Nguyễn Khương Hiếu
Hỏi từ APP VIETJACK
Viết phương trình tạo danh sách nhập n phân tử của dãy số nguyên a1,a2,...an. Tính tổng các phân tử có vị trí lẻ và thông báo ra màng hình. (n=<30)
Quảng cáo
1 câu trả lời 483
uses crt;
var a:array[1..10000] of integer;
i,n,s:integer;
begin
clrscr;
repeat
writeln('Nhap so phan tu: ');readln(n);
until n<=30;
for i:=1 to n do read(a[i]);
readln;
for i:=1 to n do if a[i] mod 2=1 then s:=s+a[i];
writeln(s);
readln
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
86358
Gửi báo cáo thành công!
