chỉ em câu này dới ạ em cảm ơm ạ

NameError:  name 'S' is not defined Câu 4
SyntaxError: expected ':' Câu 2

A=[3,-9,1,-4,15,7]
S=0
for i in range(len(A)):
    if A[i]%2!=0 :
        S=S+A[i]
print(S)

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.

giúp em với ạ em cảm ơn nhìuu

n = int(input("Nhập số lượng phần tử: "))

k = int(input("Nhập số nguyên k: "))

       arr_num = []

       for i in range(n):

x = int(input(f"Nhập phần tử thứ {i+1}: "))

arr_num.append(x)

print("Dãy số vừa nhập: ", arr_num)

sum_num = sum(arr_num)

tb_num = sum_num / n

print("Trung bình các số trong danh sách: ", tb_num)

print("Các số nằm ngoài khoảng k và số trung bình: ", end="")

for i in range(n):

       if arr_num[i] < k or arr_num[i] > tb_num:

              print(arr_num[i], end=" ")

Không có đáp án nếu đáp án `D` là dấu " ; " ở giữa `5` và `10`.

Nếu bạn nhầm dấu " , " mà viết thành dấu " ; " thì chọn `D` nhé.

Var cd,cr,cv,dt:real;

Begin

Write('Chieu dai = ');readln(cd);

Write('Chieu rong = ');readln(cr);

cv:=(cd+cr)*2;

dt:=cd*cr;

Writeln('Chu vi la ',cv:10:2);

Write('Dien tich la ',dt:10:2);

Readln

End.

Câu 1:  Viết chương trình nhập từ bàn phím số nguyên K ( K khác 0 ). Kiểm tra số K là chẵn hay lẻ. In kết quả ra màn hình

# Chương trình python

print("Nhập số nguyên K (khác 0): ")

K = int(input())

if K % 2 == 0:

      print(K, " là số chẵn.")

else:

      print(K, " là số lẻ.")

Câu 2: Viết chương trình nhập một danh sách các số nguyên từ bàn phím

a) Tính và in ra màn hình tổng các số trong danh sách đó

b) Tính và in ra màn hình số lượng các số chẵn và chia hết cho 3 có trong danh sách

c) Tính và in ra màn hình danh sách các số lẻ và chia hết cho 7 có trong danh sách

# Chương trình python

lst = list(map(int, input("Nhập danh sách các số nguyên (cách nhau bởi dấu cách): ").split()))

# Tính tổng các số trong danh sách

tong = sum(lst)

print("Tổng các số trong danh sách:", tong)

# Tính số lượng các số chẵn và chia hết cho 3 trong danh sách

so_chan_chia_3 = 0

for num in lst:

      if num % 2 == 0 and num % 3 == 0:

            so_chan_chia_3 += 1

print("Số lượng các số chẵn và chia hết cho 3 trong danh sách:", so_chan_chia_3)

# Tìm và in ra danh sách các số lẻ và chia hết cho 7 trong danh sách

danh_sach_le_chia_7 = [ ]

for num in lst:

      if num % 2 == 1 and num % 7 == 0:

            danh_sach_le_chia_7.append(num)

print("Danh sách các số lẻ và chia hết cho 7 trong danh sách:", danh_sach_le_chia_7)

1) Đề chưa rõ ràng!

2) var a:array[1..1000] of real;

i,n:integer;

min:real;

begin

write('n = ');readln(n);

for i:=1 to n do

begin

write('Nhap so thu ',i,' = ');readln(a[i]);

end;

min:=a[1];

for i:=2 to n do

if a[i] < min then min:=a[i];

write('So nho nhat trong day la ',min:10:2);

readln

end.