Sum multiples of 3 and 5: Difference between revisions

m
no edit summary
mNo edit summary
Line 968:
for N:= 1 to 999 do
if rem(N/3)=0 or rem(N/5)=0 then S:= S+N;
return S;
];
 
Line 977 ⟶ 978:
];
 
string 0; \don't terminate strings by setting most significant bit
func Sum3(D); \Return sum of sequence for really big number
string 0; \don't terminate strings by setting most significant bit
int D; \divisor
int I;
772

edits