Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- array_sum(array, n)
- var i := 0;
- var sum := 0;
- do
- i < n ->
- var elem := (array + (i * 8))^;
- sum := sum + elem;
- i := i + 1;
- continue;
- end;
- return sum;
- end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement