Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- algoritmo "semnome"
- var
- f:real
- x, y, z, t:inteiro
- inicio
- t <- 1
- x <- 1
- y <- 6
- z <- 3
- enquanto (x <= 100) faca
- enquanto (y <= 30) faca
- enquanto (z <= 15) faca
- f <- (x*x)+(y*y)+(z*z)
- f <- f/(exp(x, 4)*exp(y, 4)*exp(z, 4))
- escreval(f)
- z <- z + 2
- fimenquanto
- y <- y + 3
- fimenquanto
- t <- t + 1
- x <- t * t
- fimenquanto
- fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement