Advertisement
Guest User

Untitled

a guest
Aug 27th, 2016
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.36 KB | None | 0 0
  1. inicio
  2. a<-10
  3. b<-20
  4. c<-15
  5. d<-30
  6. n<-0
  7.  
  8. enquanto(a!=1 && b!=1 && c!=1 && d!=1) faça{
  9. enquanto (a%k==0 || b%k==0 || c%k==0 ||d%k==0) faça{
  10. se (a%k==0) entao
  11. a=a/k;
  12. se (b%k==0) entao
  13. b=b/k;
  14. se (c%k==0) entao
  15. c=c/k;
  16. se (d%k==0) entao
  17. d=d/k;
  18. }
  19. k++;
  20.  
  21. }
  22.  
  23. fim
  24.  
  25. // teste
  26. 10 20 15 30|2
  27. 5 10 15 15|2
  28. 5 5 15 15|3
  29. 5 5 5 5|5
  30. 1 1 1 1|-
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement