Algoritmos

Lista de exercicios2
Estrutura de Repetição
Paulo Roberto Moreno

1)algoritmo "media_aritmetica"
// Função :
// Autor :Paulo Roberto Moreno
// Data : 26/09/2014
// Seção de Declarações var n, soma, media: real i: inteiro inicio // Seção de Comandos soma := 0 para i de 1 ate 50 faca escreva ("Digite o ", i, "°. número: ") leia (n) soma := soma + n fimpara media := soma / 50 Escreva ("A média aritmética é: ", media)
Fimalgoritmo

2)algoritmo "Multiplos_de_2_ate_1000"
// Função :
// Autor : Paulo Roberto Moreno
// Data : 26/09/2014
// Seção de Declarações var i: inteiro inicio // Seção de Comandos para i de 1 ate 1000 faca se i%2 = 0 entao escreva(i) fimse fimpara fimalgoritmo 3)algoritmo "Conta_de_5_em_5_ate_1000"
// Função :
// Autor :Paulo Roberto Moreno
// Data : 26/09/2014
// Seção de Declarações var i: inteiro inicio // Seção de Comandos para i de 5 ate 1000 passo 5 faca escreva(i) fimpara fimalgoritmo 4)algoritmo "Digite_105_para_sair"
// Função :
// Autor : Paulo Roberto Moreno
// Data : 26/09/2014
// Seção de Declarações var char: inteiro inicio // Seção de Comandos repita escreva ("Digite 105 p/ sair: ") leia (char) ate char=105 fimalgoritmo 5)algoritmo "Tabuada_de_1_a_10"
// Função :
// Autor :Paulo Roberto Moreno
// Data : 26/09/2014
// Seção de Declarações var i, j: inteiro inicio // Seção de Comandos j:=10 para i de 1 ate 10 faca para j de 1 ate 10 faca escreval (i, " x", j, " = ", i*j) fimpara fimpara fimalgoritmo 6)1) ) algoritmo "peso_ideal"
// Função :calcular o peso ideal de uma pessoa
// Autor :Paulo Roberto Moreno
// Data : 28/09/2014
// Seção de Declarações var sexo:literal altura,peso:real inicio escreva ("informe o sexo ") leia (sexo) escreva( "digite a altura ") leia (altura) escolha sexo caso "homem", "masculino"