Sum and product of an array: Difference between revisions

m
useless in Fortran
m (useless in Fortran)
Line 896:
integer :: sresult, presult
 
sresult = sum(a);
presult = product(a);</lang>
 
=={{header|FreeBASIC}}==
1,336

edits