Anh ơi, anh nhầm khối rồi ạ nên anh chuyển lên lớp 12 hỏi chứ bọn em mới lớp 6 chx hiểu về mấy cái này nên anh thông cảm

a = []

sum = 0

n = 5

# Nhập danh sách a

for i in range(n):

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

     a.append(x)

# Tính tổng các phần tử trong danh sách a

for i in range(n):

     sum += a[i]

# In ra màn hình tổng các phần tử trong danh sách a

print("Tổng các phần tử trong danh sách a là: ", sum)

Mình cần gấp lắm ạ, ai giúp mình với T-T

2:

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) if (a[i]%2==0) cout<<a[i]<<" ";

return 0;

}

program TinhTBCTimSoNT;

var
  ten, lop: string;
  n, i, tong, dem: integer;
  A: array [1..11] of integer;
  trung_binh: real;

function LaSoNguyenTo(x: integer): boolean;
var
  i: integer;
begin
  if x < 2 then
    LaSoNguyenTo := false
  else if x = 2 then
    LaSoNguyenTo := true
  else if x mod 2 = 0 then
    LaSoNguyenTo := false
  else
  begin
    i := 3;
    while (i <= trunc(sqrt(x))) and (x mod i <> 0) do
      i := i + 2;
    LaSoNguyenTo := x mod i <> 0;
  end;
end;

begin
  // Nhập tên và lớp của học sinh
  write('Nhập tên của học sinh: ');
  readln(ten);
  write('Nhập lớp: ');
  readln(lop);

  // Nhập dãy số nguyên và tính trung bình cộng
  repeat
    write('Nhập số phần tử của dãy số (n<12): ');
    readln(n);
  until n < 12;
  tong := 0;
  for i := 1 to n do
  begin
    write('Nhập phần tử thứ ', i, ': ');
    readln(A[i]);
    tong := tong + A[i];
  end;
  trung_binh := tong / n;

  // In tên, lớp, dãy số và trung bình cộng ra màn hình
  writeln('Học sinh: ', ten);
  writeln('Lớp: ', lop);
  write('Dãy số: ');
  for i := 1 to n do
    write(A[i], ' ');
  writeln;
 
  // In các số nguyên tố của dãy số ra màn hình
  writeln('Các số nguyên tố của dãy số:');
  for i := 1 to n do
    if LaSoNguyenTo(A[i]) then
      writeln(A[i]);
end.

Program HOC24;

var a: array[1..1000] of integer;

i,n : integer;

t: longint;

begin

write('Nhap N: '); realdn(n);

for i:=1 to n do

begin

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

end;

t:=0;

for i:=1 to n do if a[i] mod 3 = 0 then t:=t+a[i];

write('Tong cac so la boi cua 3 trong danh sach la: ',t);

readln

end.