Advertisement
Guest User

Untitled

a guest
Jul 2nd, 2015
217
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. // 2.4
  2. for i=1..n
  3. del[i] = 0;
  4. end for
  5. for i=1..n
  6. if sqrt(x[i]*x[i]+y[i]*y[i])<=1 && (x[i]<=0 || y[i]<=0)
  7. del[i]=1;
  8. end if
  9. for i=1..n-1
  10. if del[i] == 1
  11. continue;
  12. end if
  13. for j=i+1..n
  14. if del[j] == 1
  15. continue;
  16. end if
  17. if x[i] == x[j] && y[i] == y[j]
  18. del[j] = 1;
  19. end if
  20. end for
  21. end for
  22.  
  23. for i=1..n
  24. if del[i] == 1
  25. usunZeZbioru(xi,yi);
  26. end if
  27. end for
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement