quarta-feira, 22 de junho de 2011

Lista de exercício de Algoritmo: exercicio 4

O exercício 4 pede o seguinte:

Ler 50 Valores reais e armazenar em um vetor. Modifique o vetor de modo que os valores das posições impares sejam aumentados em 5%, E os das posições pares sejam aumentados em 2%. Imprima Depois o vetor resultante.

 

DO PROFESSOR NO VISUALG É ASSIM

programa “aumetar percentual”

var
tipo VETOR: vetor [1..50] de real;
num: VETOR;
i : inteiro;
inicio

para
i de 1 ate 50 faca
    
escreva(“Entre com o “, i, “valor:”);
     leia( num[i]);
fimpara;

para i de 1 ate 50 faca
     se ((i mod 2) = 1 )
entao
         num[i] <- num[i] * 1.05;
   
senão
        
num[i] <- num[i] * 1.02;
    fimse;
fimpara;

para
i de 1 ate 50 faca
      
escreva( num[i] );
fimpara;

fim.

algoritmo "aumetar pelo indice"

var
valores: vetor [1..50] de real
i : inteiro

inicio

para i de 1 ate 50 faca
     escreva("Entre com o ", i, "valor: ")
     leia( valores[i])
fimpara

para i de 1 ate 50 faca
     se ((i mod 2) = 1 ) entao
         valores[i] <- valores[i] * 1.05
     senao
         valores[i] <- valores[i] * 1.02
     fimse
fimpara

para i de 1 ate 50 faca
     escreva( valores[i] )
fimpara;

fimalgoritmo

Nenhum comentário:

Postar um comentário