Quảng cáo
2 câu trả lời 208
2 năm trước
# Nhập độ dài của dãy số từ bàn phím
n = int(input("Nhập độ dài của dãy số: "))
# Khởi tạo mảng để lưu trữ dãy số
arr = []
# Nhập từng phần tử của dãy số từ bàn phím
for i in range(n):
num = int(input("Nhập phần tử thứ {} của dãy số: ".format(i+1)))
arr.append(num)
# Tính tổng giá trị của các số lẻ trong dãy số
sum_odd = 0
for num in arr:
if num % 2 != 0:
sum_odd += num
# In ra màn hình tổng giá trị của các số lẻ
print("Tổng giá trị của các số lẻ trong dãy số là:", sum_odd)
2 năm trước
Program mang;
Uses crt;
Var i,n:integer; s:longint;
A:array[1..100] of integer;
Begin
Clrscr;
Write('nhap n =');readln(n);
Writeln('nhap mang:');
For i:=1 to n do
Begin
Write('a[',i,']=');
Readln (a[i]);
End;
Writeln;
S:=0;
For i:=1 to n do if a[i] mod 2=1 then s:=s+a[i];
Writeln('tong cac so le la:',s);
Readln;
End.
Uses crt;
Var i,n:integer; s:longint;
A:array[1..100] of integer;
Begin
Clrscr;
Write('nhap n =');readln(n);
Writeln('nhap mang:');
For i:=1 to n do
Begin
Write('a[',i,']=');
Readln (a[i]);
End;
Writeln;
S:=0;
For i:=1 to n do if a[i] mod 2=1 then s:=s+a[i];
Writeln('tong cac so le la:',s);
Readln;
End.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44971
-
Hỏi từ APP VIETJACK27113
Thành viên hăng hái nhất trong tuần
-
I miss you
4255 điểm
-
` ✧`
2735 điểm
-
Judy Hopps
1410 điểm
-
⋆˚࿔ neuemla... 𝜗𝜚˚
1360 điểm
-
bích hồng nguyễn 1080 điểm
-
iu vk vãi cak
735 điểm
-
`color{red}text{HuyTùng`
530 điểm
-
`\color{pink}\text{d.`
520 điểm
-
chê ng tốt chốt ng tồi.
460 điểm
-
(┬┬﹏┬┬) 𝙻𝚘𝚟𝚎𝚒𝚜𝚝𝚛𝚞𝚎💔
450 điểm
-
chao.ngdep
445 điểm
-
౨ৎ𝘉ắ𝘱ت𝘭𝘶ộ𝘤تđê⋅˚₊‧ ଳ⋆.࿔*:･🌽
415 điểm
-
Haruto[pad] 395 điểm
-
lạnh ôm jet (:
380 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
3 năm trước8199
-
3 năm trước7715
-
3 năm trước6553
-
3 năm trước6447
-
3 năm trước6270
Gửi báo cáo thành công!
