Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- APROG
- Materia: Algoritmia
- Desições e Repetições
- .Ficha PL2
- .Demo1(FEITO)
- .Ex: 1(), 2(), 3(), 4(), 5()
- Exercício Demonstrativo 1
- ED
- num1, num2 INTEIRO
- res REAL
- op, rest CARATER
- ALG
- INICIO
- REPETIR
- Escrever("Insira dois numeros inteiros")
- LER(num1, num2)
- ESCREVER("Indique a operação (+,-,x ou /)")
- LER(op)
- CASO(op) SEJA
- '+':ESCREVER(num1,op,num2,"=",num1+num2)
- '-':ESCREVER(num1,op,num2,"=",num1-num2)
- 'x':ESCREVER(num1,op,num2,"=",num1*num2)
- '/': SE (num2!=0) ENTAO
- ESCREVER(num1,op,num2,"=",num1/num2)
- SENAO
- ESCREVER("Divisor por zero")
- OUTRO: ESCREVER("Opção invalida !!!")
- FIMCASO
- ESCREVER("Quer continuar: S/N")
- LER(reso)
- ENQUANTO(resp='S' OU resp='s')
- FIM
Add Comment
Please, Sign In to add comment