Exercício de logica

QUESTAO 1

Questão 2

var numero: inteiro inicio escreva("Digite um número de 1 a 5: ") leia(numero) escolha numero caso 1 escreval("Um") caso 2 escreval("Dois") caso 3 escreval("Três") caso 4 escreval("Quatro") caso 5 escreval("Cinco") outrocaso escreval("Número Inválido!!!") fimescolha fimalgoritmo

Questão 3
Var
A, B: real
C: caractere inicio escreva("Digite o primeiro número: ") leia(A) escreva("Digite o segundo número: ") leia(B) escreva("Digite a operação desejada (+ - / *): ") leia(C) escolha C caso "+" escreval("A+B =",A+B) caso "-" escreval("A-B =",A-B) caso "*" = escreval("A*B =",A*B) caso "/" se B = 0 entao escreval("Erro, um número não pode ser dividido por 0!") senao escreval("A/B =",A/B) fimse outrocaso escreval("Operador não definido!") fimescolha fimalgoritmo

Questão 4 – Carango VELHO var programa, opc: caractere ano, total, total2000: inteiro valor, valorFinal, desconto: real inicio programa <- "S" enquanto programa <> "N" faca limpatela escreva("Digite o valor do carro: ") leia(valor) escreva("Digite o ano do carro: ") leia(ano) se ano <= 2000 entao desconto <- 0.12 total2000 <- total2000 + 1 total <- total + 1 senao desconto <- 0.07 total <- total + 1 fimse desconto <- desconto * valor valorFinal <- valor - desconto escreval("O valor do carro com desconto é de: ",valorFinal) escreval("") escreva("Deseja continuar calculando? (S) Sim - (N) Não - ") leia(opc) escolha opc caso "S" programa <- "S" caso "N" programa <- "N" outrocaso programa <- "S" limpatela