| CARVIEW |
Select Language
HTTP/2 200
date: Sat, 11 Oct 2025 09:30:24 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=440c6eaea09e85e118fae97fe01d809990b3dc5c1bd7593fc9dc1c7c07648371a%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22KURBxGC0BVlRjzFH19pzlFhvaqxDtaRJ%22%3B%7D; HttpOnly; Path=/
cf-ray: 98cd56ae1997f470-BLR
APROG - 05/09/2013 - Exame Época Especial - Grupo I - Pastebin.com
SHARE
TWEET
APROG - 05/09/2013 - Exame Época Especial - Grupo I
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ED:
- INTEIRO num,countnum,tempnum,newnum,qtd,digito
- ALG I05092013
- DEFINIR INTEIRO LENGTH(INTEIRO num)
- count<-0
- ENQUANTO (num<>0) FAZER
- tempnum<-tempnum DIV 10
- count<-count+1
- FIMENQUANTO
- RETORNAR count
- FIMDEFENIR
- INICIO
- ESCREVER("Numero:")
- LER(num)
- ENQUANTO (num<999) FAZER
- ESCREVER("ERRO: Numero Invalido")
- ESCREVER("Numero:")
- LER(num)
- FIMENQUANTO
- countnum<-length(num)
- ESCREVER("Quantidade(1-"+contnum+")")
- LER(qtd)
- ENQUANTO (qtd<1 E qrd>contnum) FAZER
- ESCREVER("ERRO: Quantidade Invalida")
- ESCREVER("Quantidade(1-"+contnum+")")
- LER(qtd)
- FIMENQAUNTO
- newnum<-0
- tempnum<-num
- PARA i<-1 ATÉ qtd FAZER
- digito<-tempnum MOD 10
- newnum<-newnum*10+digito
- tempnum<-tempnum DIV 10
- FIMPARA
- newnum<-newnum*10^(contnum-qtd)+tempnum
- ESCREVER(num+"->"+newnum)
- FIM
Advertisement
Add Comment
Please, Sign In to add comment
-
⭐✅ MAKE $2500 IN 15 MIN⭐⭐⭐ K
JavaScript | 3 sec ago | 0.24 KB
-
⭐✅ Marketplace Glitch ✅ Working ✅ NEVER SEEN...
JavaScript | 4 sec ago | 0.24 KB
-
⭐⭐⭐Exploit 500$ in 15 Minutes⭐⭐
Java | 12 sec ago | 0.10 KB
-
⭐✅ Exploit 2500$ in 15 Minutes⭐⭐⭐ 1
JavaScript | 12 sec ago | 0.24 KB
-
✅⭐ Make $2500 in 15 minutes ✅ NEVER SEEN BEFO...
JavaScript | 13 sec ago | 0.24 KB
-
⭐✅ Exploit 2500$ in 15 Minutes⭐⭐⭐ R
JavaScript | 14 sec ago | 0.24 KB
-
⭐⭐⭐Make $15OO in 2O minutesV E⭐⭐
Java | 23 sec ago | 0.10 KB
-
Free Crypto Method (NEVER SEEN BEFORE)⭐⭐ X
JavaScript | 23 sec ago | 0.24 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
