Exrcicios algoritmos visual g

...

7)Escreva um algoritmo que receba dois números e informe a diferença do maior pelo menor.

8)Construa um algoritmo que receba trinta números e mostre a soma total dos números recebidos.

9)Construa um algoritmo que receba quinze números quaisquer e informe qual o maior e o menor entre os números que foram lidos.

10) Escreva um algoritmo que receba 100 números, e conte quantos deles estão no intervalo [10, 20] e quantos deles estão fora do intervalo, escrevendo estas informações.

1-

algoritmo "ratangulo"

var base,altura,area:real

inicio

escreval ("Digite o valor da base e da altura do Retângulo:")

leia(base,altura)

area

escreval ("O valor da area do Retângulo é:", area)

fimalgoritmo

[pic 1]

2-

algoritmo "circulo"

var raio,area:real

inicio

escreval ("Digite o valor do raio do circulo:")

leia(raio)

area

escreval ("O valor da area do Circulo é:", area)

fimalgoritmo

[pic 2]

3-

algoritmo "idade"

var anos,meses,dia,totaldias:inteiro

inicio

escreval ("Digite quantos anos, meses e dias a pessoa tem:")

leia(anos,meses,dia)

totaldias

escreval ("O total de dia que esta pessoa vive é:", totaldias)

fimalgoritmo

[pic 3]

4-

algoritmo "media"

var i:inteiro

media,n1,n2,n3,n4,n5,soma:real

inicio

escreval ("Digite 5 números:")

leia(n1,n2,n3,n4,n5)

soma

media

se media>=100 entao

escreval ("Maior")

senao escreval ("Menor")

fimse

fimalgoritmo

[pic 4]

5-

algoritmo "metade"

var metade,numero:real

inicio

escreval ("Digite um número:")

leia(numero)

metade

se metade>=50 entao

escreval ("A metade desse número é:",metade)

senao

escreval ("A metade desse número é menor que 50.")

fimse

fimalgoritmo

[pic 5]

6-

algoritmo "metade"

var numero:real

inicio

escreval ("Digite um número:")

leia(numero)

se (numero>=15) e (numero

escreval (numero, " está entre 15 e 40.")

senao

escreval ("O número não está entre 15 e 40.")

fimse

fimalgoritmo

[pic 6]

7-

escreval ("Digite 2 números:")

leia (n1,n2)

se n1>n2 entao

maior

menor

senao

menor

maior

fimse

escreval ("maior =",maior," e menor =",menor)

escreval ("A diferença entre eles é:",maior-menor)

fimalgoritmo

8- algoritmo "8"

var num,soma:inteiro

inicio

para num de 1 ate 30 faca

escreval ("Digite 30 números:")

leia (num)

soma

fimpara

escreval ("A soma de todos os número é: ", soma)

fimalgoritmo

9- algoritmo "8"

var