Lista Introdução a Programação (REPETIÇÃO
COMPLEMENTAR P/ PROVA
INTRODUÇÃO À PROGRAMAÇÃO
Prof. Sérgio Roberto Costa Vieira
ESTRUTURAS DE REPETIÇÃO
1. Faça um programa que leia o número de termos da série (N), determine e mostre o valor de S, sendo:
S = N + N-1 + ... + 3 + 2 + 1
N N
N N N algoritmo declare N,i:inteiro; declare S:real; escreva("informe um numero de termos"); leia(n); se(N>0)entao; para i<-n ate 1 passo-1 faca
S<-S+i/n;
fimpara escreva("o valor de S:"); senao escreva("informe outro valor que seja positivo"); fimse fimalgoritmo
Algoritmo_01
declare n, i : inteiro; delcare s : Real; s←0.0; escreva("Informe o numero de termos:"); leia(n); se(n>0)então para i←n até 1 passo -1 faça s←s+i/n; fimpara senão escreva("Invalido"); fimse escreva("O valor de S e:", s); fimalgoritmo 2. Faça um programa que mostre a tabuada de um número qualquer, a partir do operador informado pelo usuário, os operadores válidos são ( “ + ”, “ – ”, “ * ”, “ / ”):
Algoritmo_02
delcare op: caracter; declare n,i : inteiro escreva("Informe um numero:"); leia(n); se(n>0)então escreva("Informe um operador: + , - , * , / "); leia(op); se(op='+')então para i←1 até 10 faça escreva(n," + ", i," = ", n+i); fimpara senão se(op='*')então
para i←1 até 10 faça escreva(n," * ", i," = ", n*i); fimpara senão se(op= ' - ')então para i←n+1 até n+10 faça escreva(i," - ",n ," = ", i-n); fimpara senão se(op= ' / ')então para i←n até n*10 passo n faça escreva(i," / ",n ," = ", i-n); fimpara senão escreva("invalido"); fimse fimse fimse fimse fimse fimalgoritmo 3. Faça um programa para calcular o valor de A, onde:
A = 1 + 3 + 5 + 7 + 9 + ... + 49
1 2 3 4 5
25
Algoritmo_03 declare i, n: inteiro; declara A : real;
A←0.0; n←1; para i←1 até 49 passo 2 faça
A←A + i / n ; n←n+1; fimpara escreva("O valor de A é:", A); fimalgoritmo 4. Faça um programa que receba a idade, a altura e o peso de uma quantidade de pessoas não determinadas, calcule e mostre: a. A quantidade de pessoas com idade superior a 50 anos;
b. A média das alturas