ATPS JULIANA 2 ETAPA

FACULDADE ANHANGUERA

Curso- Sistemas de Informação
1º período- manhã

Alunos: Edevânia Santiago Braga RA- 1054002954 Warlem Lucio Lima RA – 1053010947 Pedro Henrique Santos Rodrigues RA-1053012085

ATIVIDADES PRÁTICAS
SUPERVISIONADAS

Minas Gerais 2010

Inicio tipo vet_moeda = vetor [1..30] de real; vet_moeda= v_euro; inteiro: i,dia,base,convertida; real: quantidade,maior←0,menor←10,media←0,resultado,euro←2.63; para i de 1 ate 30 faça inicio se (euro<2.43) então inicio euro←euro+euro*0.04; v_euro[i←euro; fim; senão inicio euro←euro-euro*0.03; v_euro[i] ←euro; fim; fim se; fim; fim para; para i de 1 ate 30 faça inicio media←media +v_euro[i]; se (v_euro[i]>maior) então maior←v_euro[i]; senão (v_euro[i]<menor) menor←v_euro[i]; fim se; media←media/30; fim; fim para; repita inicio escreva ("Escolha uma opcao de Moeda Base"); escreva (" 1 para Real."); escreva (" 2 para Euro."); escreva (" Moeda Base escolhida: "); leia (base); fim; até (base=1 ou base=2); escreva ("-------------------------------------------------------------------------------"); escreva (" Escolha uma opcao para qual moeda voce quer a conversao"); escreva (" 1 para Real."); escreva (" 2 para Euro."); escreva (" Moeda a ser convertida escolhida: "); leia (convertida); enquanto (convertida=base ou convertida<1 ou convertida>2) inicio escreva ("Escolha uma opcao entre 1 e 2 e diferente da moeda base (no caso diferente de” ,base, ” ): "); leia (convertida); fim; fim enquanto; escreva ("-------------------------------------------------------------------------------"); escreva ("