AI giúp mình gấp với được không ạaaaaaaa T T Mai mình kiểm tra rồi
C2 viết chương trình nhập n phần tử rồi tính tổng các phần tử lớn hơn hoặc bằng 5
C3 nhập dữ liệu kiểu xâu
program chuogntrinh; var a:array[1..100] of integer; n,i,s:integer; begin writeln('nhap so phan tu'); readln(n); for i:=1 to n do readln(a[i]); s:=0; for i:=1 to n do if a[i] >=5 then s:=s+a[i]; writeln('tong la ', s:4); readln; end.