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
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.