Eu desenvolvi um algoritmo em Linguagem Natural, utilizando o Visualg e identifiquei as etapas do desenvolvimento de Software: Entrada de Dados (Input), Processamento, Saída de Dados (Output).
Algoritmo "LuraDelivery"
// Disciplina : Pensamento Computacional
// Descrição : Sistema de Cálculo de Frete.
// Autor(a) : Luiz Fernando
// Data atual : 23/04/2026
Var
// Seção de Declarações das variáveis
distancia: Real
chuva: Caractere
taxaChuva: Real
maps: Caractere
previsao: Caractere
prevChuva: Caractere
frete: Real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
// Entrada de Dados (Input)
maps <- "shre.ink/consultarmapa"
previsao <- "shre.ink/previsaoTempo"
taxaChuva <- 2
Escreval("++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++")
Escreval("LURA DELIVERY")
Escreval("++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++")
Escreval()
//Eu considerei que a empresa fica no Centro de São Paulo, então criei
//um link para o Google Maps da origem (Centro de São Paulo) onde a empresa
//está localizada, e o funcionário digitará o endereço de destino e conseguirá
//pegar a distância.
Escreval("CONSULTAR ENDEREÇO DE ENTREGA")
Escreval("--------------------------------------------------------------")
Escreval(maps)
Escreval("Copie e Cole o Link do seu navegador")
Escreval("--------------------------------------------------------------")
Escreval()
Escreval("Digite a distancia de Entrega: ")
leia(distancia)
Escreval()
//Nesse trecho o cliente pode consultar a previsão do tempo em um site
//Oficial, assim caso o cliente solicite outra data, a empresa pode ver
//se nesse dia tem previsão de chuva.
Escreval("CONSULTAR PREVISAO DO TEMPO")
Escreval("--------------------------------------------------------------")
Escreval(previsao)
Escreval("Copie e Cole o Link do seu navegador")
Escreval("--------------------------------------------------------------")
Escreval()
Escreva("Esta Chovendo? [S/N]: ")
leia(prevChuva)
prevChuva <- maiusc(prevChuva)
Escreval()
// Processamento
Se (distancia <= 5) e (prevChuva = "S") Entao
frete <- (5 + taxaChuva)
Senao
Se (distancia <= 5) e (prevChuva = "N") Entao
frete <- 5
Senao
Se((distancia > 5) e (distancia <= 10)) e (prevChuva = "S") Entao
frete <- (8 + taxaChuva)
Senao
Se ((distancia > 5) e (distancia <= 10)) e (prevChuva = "N") Entao
frete <- 8
Senao
Se (distancia > 10) e (prevChuva = "S") Entao
frete <- (10 + taxaChuva)
Senao
frete <- 10
FimSe
FimSe
FimSe
FimSe
FimSe
//Saida (Output)
Escreval("FATURAMENTO---------------------------------------------------")
Escreval()
Escreval("DISTANCIA: ",distancia," KM")
Escreval("FRETE...................................: R$ ",(frete-taxaChuva):5:2)
Escreval("TAXA DE CHUVA...........................: R$ ",taxaChuva:5:2)
Escreval("FRETE TOTAL.............................: R$ ",frete:5:2)
Escreval()
Escreval("--------------------------------------------------------------")
Fimalgoritmo
Conte com o apoio da comunidade Alura na sua jornada. Abraços e bons estudos!