Atps- algoritmo

Disponível somente no TrabalhosFeitos
  • Páginas : 11 (2731 palavras )
  • Download(s) : 0
  • Publicado : 26 de outubro de 2012
Ler documento completo
Amostra do texto
Faculdade Anhanguera Sorocaba
Tecnologia em Análise e Desenvolvimento de Sistema
2ª Série


NOME: Natan Ribeiro Dutra RA: 3711635746
NOME: João Flávio RA: 4211813590

ATPS
Construção de Algoritmos
Etapa 2

Prof. Claudinéia Magalhães

Sorocaba, 01 de Outubro de 2012
Etapa 2
Passo 1:
Algoritmo
Inicio
1- Usuário escolhe para qual a moeda desejaconverter;
2- Depois de selecionado para qual moeda deseja converter o usuário digita o valor desejado;
3- Onde o software ira efetuar a conversão
4- O resultado será exibido na tela
5- O software ira perguntar se o usuário deseja sair;
6- Se resposta “S” o programa ira fechar;
7- Se resposta diferente de “S” ira continuar;
Fim

Pseudocódigo
Inicio
Inteiro: a;
Caracter:opcao
Real: Dolar, Dc, Euro, Valor, Resp;
Dolar 1.90;
Dc 1.97;
Euro 2.60;
Repita
Escreva(“ Cotação do Dólar Americano = US$ 1.90”);
Escreva(“ Cotação do Dólar Canadense = USC$ 1.97”);
Escreva(“ Cotação do Euro = E$ 2.60”);
Escreva(“Escolha uma das opções correspondente a moeda que deseja para conversão”);
Escreva(“Digite 1 – para conversão de Real para Dólar Americano”);Escreva(“Digite 2 – para conversão de Real para Dólar Canadense”);
Escreva(“Digite 3 – para conversão de Real para Euro”);
Escreva(“Digite 4 – para conversão de Dólar Americano para Real ”);
Escreva(“Digite 5 – para conversão de Dólar Americano para Dólar Canadense”);
Escreva(“Digite 6 – para conversão de Dólar Americano para Euro”);
Escreva(“Digite 7 – para conversão de Dólar Canadense para Real”);Escreva(“Digite 8 – para conversão de Dólar Canadense para Dólar Americano”);
Escreva(“Digite 9 – para conversão de Dólar Canadense para Euro”);
Escreva(“Digite 10 – para conversão de Euro para Real”);
Escreva(“Digite 11 – para conversão de Euro para Dólar Americano ”);
Escreva(“Digite 12 – para conversão de Euro para Dólar Canadense”);
Leia(a);
Escolha a
Caso 1 : Escreva(“ Digite o valor paraconversão em Real para Dólar Americano”);
Leia(valor);
Respvalor/Dolar;
Escreva(“ O valor em Dólar Americano é US$:”,Resp);
Caso 2 : Escreva(“ Digite o valor para conversão de Real para Dólar Canadense”);
Leia(valor);
Resp valor/Dc;
Escreva(“ O valor em Dólar Canadense é USC$:”,Resp);
Caso 3 : Escreva(“ Digite o valor para conversão de Real para Euro”);
Leia(valor);
Resp valor/Euro;Escreva(“ O valor em Euro é E$:”,Resp);
Caso 4 : Escreva(“ Digite o valor para conversão de DólarAmericano para Real”);
Leia(valor);
Resp valor*Dolar;
Escreva(“ O valor em Real é RS$:”,Resp);
Caso 5 : Escreva(“ Digite o valor para conversão de Dólar Americano para Dólar Canadense”);
Leia(valor);
Resp Dolar/Dc*valor;
Escreva(“ O valor em DólarCanadense é USC$:”,Resp);
Caso 6 : Escreva(“ Digiteo valor para conversão de Dólar Americano para Euro”);
Leia(valor);
Resp Dolar/Euro*valor;
Escreva(“ O valor em Euro é E$:”,Resp);
Caso 7 : Escreva(“ Digite o valor para conversão de Dólar Canadense para Real”);
Leia(valor);
Resp valor*Dc;
Escreva(“ O valor em Real é RS$:”,Resp);
Caso 8 : Escreva(“ Digite o valor para conversão de Dólar Canadense para Dólar Americano”);
Leia(valor);Resp Dc/Dolar*valor;
Escreva(“ O valor em DólarAmericano é US$:”,Resp);
Caso 9 : Escreva(“ Digite o valor para conversão Dólar Canadense para Euro”);
Leia(valor);
Resp Dc/Euro*valor;
Escreva(“ O valor em Euro é E$:”,Resp);
Caso 10 : Escreva(“ Digite o valor para conversão de Euro para Real”);
Leia(valor);
Resp valor*Euro;
Escreva(“ O valor em Reais é RS$:”,Resp);
Caso 11 : Escreva(“Digite o valor para conversão de Euro para Dólar Americano”);
Leia(valor);
Resp Euro/Dolar*valor;
Escreva(“ O valor em Dólar Americano é US$:”,Resp);
Caso 12 : Escreva(“ Digite o valor para conversão de Euro para Dólar Canadense”);
Leia(valor);
Resp Euro/Dc*valor;
Escreva(“ O valor em Dólar Canadense é USC$:”,Resp);
Caso contrario: Escreva(“Opção Invalida”);
Fim Escolha...
tracking img