Essays.club - TCC, Modelos de monografias, Trabalhos de universidades, Ensaios, Bibliografias
Pesquisar

Algoritmo "Consumo de Combustível"

Por:   •  28/12/2017  •  754 Palavras (4 Páginas)  •  350 Visualizações

Página 1 de 4

...

m

mes

dia

d

ano

se (mes

escreval("Mês=",int(mes)," Dia=",(d):2, " Ano=",int(ano))

senao

escreval("Data Inválida!!! Digite Novamente")

escreval

escreval("Digite uma Data no Formato(mmddaaaa):")

leia(data)

fimse

fimalgoritmo

- EXERCICIO 5

algoritmo "Cálculo de Média"

// Função :

// Autor : Alex Ferreira

// Data : 23/08/2013

// Seção de Declarações

var

n1,n2,n3,n4,n5,soma:inteiro

inicio

// Seção de Comandos

escreval("Digite 5 Números, para Calcular a Média:")

escreval

escreval("Digite o Primeiro Número: ")

leia (n1)

escreval("Digite o Segundo Número: ")

leia(n2)

escreval ("Digite o Terceiro Número: ")

leia(n3)

escreval("Digite o Quarto Número: ")

leia (n4)

escreval ("Digite o Quinto Número: ")

leia (n5)

soma

escreval

escreval("Média dos Cinco Números --->",soma)

fimalgoritmo

- EXERCICIO 6

algoritmo "Calcular Quadrado e Raiz Quadrada"

// Função :

// Autor : Alex Ferreira

// Data : 23/08/2013

// Seção de Declarações

var

n:real

inicio

// Seção de Comandos

escreval("Digite um Número para Calcular seu Quadrado e Raiz Quadrada:")

leia(n)

escreval ("Quadrado:------->",n^2)

escreval ("Raiz Quadrada:-->",raizq(n):8:3)

fimalgoritmo

- EXERCICIO 7

algoritmo "Calcular Juro"

// Função :

// Autor : Alex Ferreira

// Data : 23/08/2013

// Seção de Declarações

var

saldo,juro,calc:real

inicio

// Seção de Comandos

escreval("Digite seu Saldo R$:")

leia(saldo)

escreval("Digite o Juro a ser Calculado %:")

leia(juro)

calc

escreval

escreval("Novo Saldo: R$",(calc):8:2)

fimalgoritmo

- EXERCICIO 8

algoritmo "Calcular Área de um Triangulo Retangular"

// Função :

// Autor : Alex Ferreira

// Data : 23/08/2013

// Seção de Declarações

var

a1,a2,a3:inteiro

area:real

inicio

// Seção de Comandos

escreval("Calcular Área de um Triângulo Retangular")

escreval

escreval("Digite a Área dos Lados: ")

leia(a1)

escreval("Digite a Base: ")

leia(a2)

se ((a1>0) e (a2>0)) entao

area

escreval

escreva ("Área do Triangulo é --->",area)

senao

escreva ("Digite Valores Válidos")

fimse

escreval

fimalgoritmo

- EXERCICIO 9

algoritmo "Calculo Desconto"

// Função :

// Autor : Alex Ferreira

//

...

Baixar como  txt (8.9 Kb)   pdf (67.6 Kb)   docx (22.4 Kb)  
Continuar por mais 3 páginas »
Disponível apenas no Essays.club