Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Var s,st:string;
i:integer;
Begin
Write('Nhap xau ');readln(s);
For i:=1 to length(s) do
If s[i] in ['0'..'9'] then st:=st+s[i];
Write('Cac ki tu so co trong day la ',st);
Readln
End.
A=input("Nhập dãy các số cách nhau bởi dấu cách: ")
S=A.split()
k = 0
n=[]
c = len(S)
m1 = min(S)
m2 = max(S)
for x in S:
n.append(float(x))
b=[]
for a in n :
if a % 2 != 0 :
b.append(float(a))
S=0
for i in b:
k=k+i
print("Số lượng các số đã nhập",c)
print("Tổng các số lẻ là", k)
print("Số nhỏ nhất là", m1)
print("Số lớn nhất là ", m2)
# Yêu cầu người dùng nhập 20 số nguyên không âm
numbers = []
for i in range(20):
number = int(input("Nhập số nguyên không âm thứ {}: ".format(i+1)))
numbers.append(number)
# Tính tổng các phần tử là số chẵn ở vị trí lẻ
total = 0
for i in range(1, 20, 2):
if numbers[i] % 2 == 0:
total += numbers[i]
# Hiển thị kết quả
print("Tổng các phần tử là số chẵn ở vị trí lẻ là:", total)
