algoritimo

Progama media

VAR Num 1: Float Num 2: Float Num 3: Float Num 4: Float media: Float

Inicio ESCREVER "Qual é o Num1?" LER num1 ESCREVER "Qual é o Num2?" LER num2 ESCREVER "Qual é o Num3?" LER num3 ESCREVER "Qual é o Num4?" LER num4 media = Num1+Num2+Num3+Num4 ESCREVER "A média é", media
FIM

progama consumo

VAR consumomed: Float distanciaper: Float consumotot: Float

Inicio ESCREVER "Qual a distância percorrida?" LER distanciaper ESCREVER "Qual o consumo total durante a distância percorrida?" LER consumotot consumomed = distanciaper/consumotot ESCREVER "O consumo médio em KM/l é de", consumomed
FIM

progama temperatura

VAR Fare: Float Cels: Float Inicio ESCREVER "Qual a temperatura em graus Celsius?" LER cels Fare = (9*Cels+160)/5 ESCREVER "A temperatura em graus Fahrenheit é de", fare
FIM

progama lataoleo

VAR raio: Float altura: Float volume: Float Inicio ESCREVER "Qual a altura da lata de óleo?" LER altura ESCREVER "Qual o raio da lata de óleo?" LER raio volume = 3,14159*pow(r,2)*altura ESCREVER "O volume da lata de óleo é de", volume
FIM

progama doispontos

VAR ponto1a: Float ponto1b: Float ponto2a: Float ponto2b: Float distancia: Float

Inicio ESCREVER "Qual o X do ponto 1?" LER ponto1a ESCREVER "Qual o Y do ponto 1?" LER ponto1b ESCREVER "Qual o X do ponto 2?" LER ponto2a ESCREVER "Qual o Y do ponto 2?" LER ponto2b distancia = SQRT(pow(ponto1b-ponto1a,2)+pow(ponto2b-ponto2a,2)) ESCREVER "A distância entre os dois pontos é", distancia

progama imposto

VAR custocarro: Float preçofinal: Float Inicio ESCREVER "Qual o valor do custo da fabrica por carro?" ler custocarro preçofinal = custocarro+73% ESCREVER "O preço final do carro será", preçofinal