Một số khái niệm cơ bản của tin học

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Mai Nguyễn

Cho số nguyên dươg N và dãy a1, a2...aN. Tính tổng các số nằm ở vị trí lẻ

Đoàn Xuân Sơn
24 tháng 10 2018 lúc 21:59

var

s,i,n:integer;

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

begin

write(' nhap so phan tu mang : ');

readln(n);

for i:= 1 to n do

begin

write('a[',i,']=');

readln(a[i]);

end;

for i:= 1 to n do

if i mod 2 <> 0 then

s:= s + a[i];

write(' tong cac phan tu co vi tri le la : ',s);

readln;

end.

Ý TƯỞNG : nhập số phần tử rồi cho 1 vòng for từ 1 đền n rồi nhập từng phần tử mạng sau đó cho 1 vòng for đến n kiểm tra vị trị ( vị trí là biến mình dùng để chạy for ) có phải lẻ hay không bằng cách chia lấy dư cho 2 nếu là chia 2 mà dư 0 là chẵn còn nếu khác 0 là số lẻ rồi dùng biến cộng phần tử đỏ a[biến chạy] rồi in ra màn hình.

Mai Nguyễn
23 tháng 10 2018 lúc 15:45

giúp mình với


Các câu hỏi tương tự
Nga Nguyễn
Xem chi tiết
Bình Minh
Xem chi tiết
Võ Thị Lan Anh
Xem chi tiết
Hân Bùi
Xem chi tiết
Huỳnh Lê Thảo Nguyênn
Xem chi tiết
Lê Trung Tiến
Xem chi tiết
gấu subi
Xem chi tiết
Ánh Thi
Xem chi tiết
Nguyễn Phúc Huy
Xem chi tiết