Lập trình pascal - mảng 1 chiều

1

11thanhkhoeo

Mã: 
IF A[I] mod 2 =0 then 

begin 
  dem:=dem+1;
  tong := tong+a[i] ;
end;


Đã mất công viết code a viết hoàn chỉnh tý nhé!
 
Last edited by a moderator:
You must log in or register to reply here.
Top Bottom