Advertisement
Guest User

Untitled

a guest
May 31st, 2016
58
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.23 KB | None | 0 0
  1. array_sum(array, n)
  2. var i := 0;
  3. var sum := 0;
  4. do
  5. i < n ->
  6. var elem := (array + (i * 8))^;
  7. sum := sum + elem;
  8. i := i + 1;
  9. continue;
  10. end;
  11. return sum;
  12. end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement