Questão 1 algoritmo consumocombustivel

Questão 1

algoritmo consumocombustivel

var

quil_inicial, quil_final, quil_rodados, litros, consumo: real

Inicio

Leia (quil_inicial)

Leia (quil_final)

Leia (litros)

quil_rodados := (quil_final - quil_inicial)

consumo := quil_rodados / litros

escreva (consumo)

Fimalgoritmo

Questão 2

algoritmo "calcula_quadrado"

var

x, quadrado: inteiro

Inicio

escreva ("Digite um numero inteiro: ")

leia (x)

resultado := x * x

escreva (quadrado)

fimalgoritmo

Questão 3

algoritmo "calculadora"

var

n1,n2:inteiro

resultado: real

Inicio

escreva ("Digite o 1º número: ")

leia (n1)

escreva ("Digite o 2º número: ")

leia (n2)

resultado := n1 + n2

escreval ("A soma dos números é ",resultado)

resultado := n1 - n2

escreval ("A subtração do 1º pelo 2º número é ",resultado)

resultado := n2 - n1

escreval ("A subtração do 2º pelo 1º número é ",resultado)

resultado := n1 * n2

escreval (" A multiplicação dos números é ",resultado)

resultado := n1 / n2

escreval ("A divisão do 1º pelo 2º ",resultado)

resultado := n2 / n1

escreval ("A divisão do 2º pelo 1º ",resultado)

fimalgoritmo