Ler 2 valores, calcular e escrever a soma dos inteiros existentes entre os 2 valores lindo (incluindo os valores lido na soma ) considere que o segundo valor lido será sempre maior que o primeiro valor lido
Soluções para a tarefa
Resposta:
var
valor1, valor2, aux, soma: inteiro
inicio
// Seção de Comandos
Escreva("Digite o primeiro valor: ")
Leia(valor1)
Escreva("Digite o segundo valor: ")
Leia(valor2)
soma := valor1 + valor2
se valor1 > valor2 entao
Escreval("O valor 1 é maior que o valor 2. Será invertido")
Escreval("Valor1: ", valor1)
Escreval("Valor2: ", valor2)
Escreval("-------------------------")
aux := valor1
valor1 := valor2
valor2 := aux
Escreval("Valor1: ", valor1)
Escreval("Valor2: ", valor2)
Escreval("-------------------------")
soma := aux + valor1
Escreval("O resultado da soma é: ", soma)
senao
Escreval("O resultado da soma é: ", soma)
fimse
fimalgoritmo
Explicação:
Espero que esse código ajude...
Está em Portugol, pois não há uma indicação da linguagem e está escrito conforme compreendi o enunciado. Acredito que está faltando algo, mas nesse exemplo se o valor 1 for maior que o valor 2 o algoritmo irá fazer com que o valor 2 receba o valor 1 ficando sempre o valor 2 maior que o valor 1.