Jump to content

Sum and product of an array: Difference between revisions

m
(Added COBOL solution.)
Line 108:
p *= l_q_integer(l, i);
}
}
 
list
new_list(...)
{
integer i;
list l;
 
i = -count();
while (i) {
lb_p_integer(l, $i);
i += 1;
}
 
return l;
}
 
Line 130 ⟶ 115:
integer sum, product;
 
compute(sum, product, new_listl_effect(2, 3, 5, 7, 11, 13, 17, 19));
 
o_integer(sum);
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.