uses crt;

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

begin

clrscr;

write ('nhap so luong phan tu: ');  readln (n);

s:=0;

for i:=1 to n do

begin

write ('nhap phan tu thu ',i,': ');  readln (a[i]);

s:=s+a[i];

end;

writeln ('Tong la: ',s);

readln;

end.

using static System.Console;
class Daoanhviet96{
    static void Main(string[] args){
        long n = long.Parse(ReadLine());
        long[] a = new long[n];
        long tong=0;
        for (long i=0; i<n; i++){
            a[i] = long.Parse(ReadLine());
            tong=tong+a[i];
        }
        Write("Tong: "+tong);
    }
}

$\color{green}{\text{Cần code Java, C++, Python, JavaScript thì nói để mình thêm}}$

$\color{red}{\text{#Daoanhviet96}}$