atividade 6 algo

Prévia do material em texto

algoritmo E PROGRAMAÇÃO
atividades DA aula 06
Todos os algoritmos desta atividade deverão ser desenvolvidos no VISUALG e enviados no Microsoft Word.
Para desenvolver estes algoritmos deverão ser utilizadas as estruturas de repetição (ENQUANTO......FAÇA, REPITA...ATÉ, PARA ... FAÇA) quando necessário.
Faça um algoritmo que leia uma lista de números aleatórios, cujo último número é -99. Ao final, o algoritmo deve mostrar a média aritmética de todos os números positivos da lista, os números negativos devem ser descartados.
algoritmo "soma positiva"
// Função :Algoritmo para soma e media de numeros positivos
// Autor :NIvea Preradovic
// Data : 01/06/2018
// Seção de Declarações
var
soma, numero: inteiro
media, quantidade: real
inicio
// Seção de Comandos
numero <- -99
soma <- 0
media <- 0
escrevaL("Digite um numero:")
leia (numero)
soma <- soma + numero
enquanto numero > -99 faca
escrevaL("digite um numero:")
leia (numero)
soma <- soma + numero
quantidade <- soma - numero
media <- media + 1
fimenquanto
escrevaL ("a soma dos numeros é:", quantidade)
escrevaL("media:", quantidade/media)
fimalgoritmo
José tem 1,50 m e cresce 2 centímetros por ano. Pedro tem 1,10 m e cresce 3 centímetros por ano. Faça um algoritmo para calcular em quantos anos Pedro será maior que José.
algoritmo "calculo de crescimento"
// Função : Calcular daqui quantos anos Pedro sera maior que Jose
// Autor :Nivea Preradovic
// Data : 01/06/2018
// Seção de Declarações
var
altura1,altura2:real
c:inteiro
inicio
// Seção de Comandos
altura1<-1.50
altura2<-1.10
c<-0
enquanto (altura1>altura2) faca
altura1<-altura1+0.02
altura2<-altura2+0.03
c<-c+1
fimenquanto
Escreval("Daqui a",c," anos Pedro sera maior que Jose.")
Fimalgoritmo
Faça um algoritmo para calcular o produto de dois números lidos da entrada (n1 e n2) através do método de somas sucessivas. Suponha que n1 e n2 são positivos.
Exemplo:
valores lidos: 3 4
impressão:	12
dica: 3 x 4 = 3 + 3 + 3 + 3 = 12
resposta:
algoritmo "somasucessiva"
// Função : Verficar soma sucessiva
// Autor : Nivea Preradovic
// Data : 01/06/2018
// Seção de Declarações 
var
v, v1, v2, soma: inteiro
inicio
// Seção de Comandos
soma<- 0
escrevaL("digite o primeiro valor:")
leia (v)
escrevaL("digite o segundo valor:")
leia (v1)
para v2 de 1 ate v faca
soma<- soma + v1
fimpara
escrevaL("a soma sucessiva é:", soma)
fimalgoritmo
�