Resposta Caderno de Exercicios Algoritmos PARA-FACA

Prévia do material em texto

Lee August Silva Castro 
1 
Junho/2015 
EXERCÍCIOS ESTRUTURA PARA...FAÇA 
88. Some os números de 1 a 100 e imprima o valor. 
 
algoritmo "Exercicio_88" 
// Função : Somar os numeros de 1 a 100 e imprimir o valor 
// Autor : Lee August Silva Castro 
// Data : 11/06/2015 
// Seção de Declarações 
var 
i, soma: inteiro 
 
inicio 
// Seção de Comandos 
i<-1 
soma<-0 
enquanto i<=100 faca 
 soma<-soma+i 
 i<-i+1 
fimenquanto 
escreva("A soma dos números de 1 a 100 é: ", soma) 
fimalgoritmo 
 
 
PDF criado com pdfFactory Pro versão de avaliação www.pdffactory.com
Lee August Silva Castro 
2 
Junho/2015 
89. Construa um Algoritmo que, para um grupo de 50 valores inteiros, determine: 
a) A soma dos números positivos; 
b) A quantidade de valores negativos; 
 
algoritmo "Exercicio_89" 
// Função : Elaborar algoritmo que para um grupo de 50 valores inteiros determinar 
// a soma dos números inteiros e a quantidade de valores negativos 
// Autor : Lee August Silva Castro 
// Data : 11/06/2015 
// Seção de Declarações 
var 
valor,neg, soma, i: inteiro 
inicio 
// Seção de Comandos 
i<-1 
soma<-0 
neg<-0 
enquanto i<=50 faca 
 escreva("Digite um valor: ") 
 leia(valor) 
 se valor>=0 entao 
 soma<-soma+valor 
 senao 
 neg<-neg+1 
 fimse 
 i<-i+1 
fimenquanto 
escreval("a) Soma dos números positivos: ", soma) 
escreva("b) Quantidade de valores negativos: ", neg) 
fimalgoritmo 
 
 
PDF criado com pdfFactory Pro versão de avaliação www.pdffactory.com
Lee August Silva Castro 
3 
Junho/2015 
90. Faça um algoritmo que imprima os múltiplos positivos de 7, inferiores a 1000. 
 
algoritmo "Exercicio_90" 
// Função : Imprimir múltiplos positivos de 7 inferiores a 1000 
// Autor : Lee August Silva Castro 
// Data : 11/06/2015 
// Seção de Declarações 
var 
i, mult: inteiro 
 
inicio 
// Seção de Comandos 
i<-1 
enquanto i<=1000 faca 
 mult<-7*i 
 escreval(mult) 
 i<-i+1 
fimenquanto 
fimalgoritmo 
 
PDF criado com pdfFactory Pro versão de avaliação www.pdffactory.com