estou com uma grande duvida, faço curso de TADS e meu professor quer que nós passemos um código que fizemos em portugol no visualg para a linguagem C, estou muito perdido em como fazer isso.
algoritmo "Locação de Veiculos"// Função : Locadora de Veiculos// Autor : Maxwell Ruan// Data : 21/10/2017// Seção de Declarações
var
opcao,opcao2 : inteiro
CODIGO,NOME,RG,CPF,ENDERECO,DATADENASCIMENTO,CNH,CLIENTE,AUTOMOVEL:CARACTER
MARCAVEICULO,CODIGOVEICULO,MODELO,ANOFABRICACAO,CLASSIFICACAO,CODIGOCLASS:CARACTER
VALOR:REAL
a,b,soma :numerico
// procedimentos
procedimento menu_principal
inicio
escreval ("++++++++++++++++++++++++++++++++++++")
escreval (" 1- Cadastro de Cliente +")
escreval (" 2- Cadastro de Veiculos +")
escreval (" 3- Cadastro de Classificação +")
escreval (" 4- Cadastro de movimentação +")
escreval (" 5- Sair +")
escreval ("++++++++++++++++++++++++++++++++++++")
fimprocedimento
procedimento menu_cliente
inicio
escreval ("======Menu do Cliente=====")
escreval (" ")
escreval ("==========================")
escreval ("Digite o Código")
leia (codigo)
escreval ("Digite o Nome")
leia (nome)
escreval ("Digite o RG")
leia (rg)
escreval ("Digite o CPF")
leia (cpf)
escreval ("Digite o Endereço")
leia (endereco)
escreval ("Digite a Data de Nascimento")
leia (datadenascimento)
escreval ("Digite a Carteira de habilitação")
leia (cnh)
limpatela
fimprocedimento
procedimento menu_veiculo
inicio
escreval ("+==========Menu do Veiculo================ +")
escreval ("+ Digite (01) se for do tipo Básico +")
escreval ("+ Digite (02) se for do tipo Intermediário +")
escreval ("+ Digite (03) se for do tipo Luxuoso +")
escreval ("+========================================= +")
escreval ("Digite o Código")
leia (CODIGOVEICULO)
escreval ("Digite a Marca do Veciulo")
leia (MARCAVEICULO)
escreval ("Digite o Modelo do Veiculo")
leia (MODELO)
escreval ("Digite o Ano de Fabricação")
leia (ANOFABRICACAO)
escreval ("Digite o Codigo de Classificação")
leia (CLASSIFICACAO)
limpatela
fimprocedimento
procedimento menu_class
inicio
escreval ("+==========Menu de Classificação========== +")
escreval ("+ Digite (01) se for do tipo Básico +")
escreval ("+ Digite (02) se for do tipo Intermediário +")
escreval ("+ Digite (03) se for do tipo Luxuoso +")
escreval ("+========================================= +")
escreval ("Digite o Código")
leia (CODIGOCLASS)
escreval ("Digite a Marca do Veciulo")
leia (MARCAVEICULO)
escreval ("Digite a Classificação")
leia (CLASSIFICACAO)
escreval ("Digite o Valor da locação")
leia (VALOR)
limpatela
fimprocedimento
procedimento menu_movimentacao
inicio
escreval ("========Menu de Movimentação=======")
escreval ("! [ Valor das Diárias ] !")
escreval ("! Básico :R$ 80,00 !")
escreval ("! Intermediário :R$ 150,00 !")
escreval ("! Luxuoso :R$ 300,00 !")
escreval ("!=================================!")
escreval ("Digite o Código")
leia (codigo)
escreval ("Digite o Código do Cliente")
leia (CLIENTE)
escreval ("Digite o Código do Automovel")
leia (AUTOMOVEL)
escreval ("Digite o Valor da locação")
leia (a)
escreval ("Digite a Quantidade de Diarias")
leia (b)
soma:=(a*b)
escreval ("=============================================+")
escreval ("O Valor Total que o Cliente pagará será:",soma)
escreval (" +")
escreval ("=============================================+")
fimalgoritmo
limpatela
fimprocedimento
inicio
// Seção de Comandos
repita
menu_principal
escreva ("=>")
leia (opcao)
limpatela
escolha (opcao)
caso 1// cadastro de cliente
menu_cliente
caso 2// cadastro de veiculos
menu_veiculo
caso 3// cadastro de classificação
menu_class
caso 4// cadastro de movimentação
menu_movimentacao
caso 5// sair
outrocaso
escreval("Opção Invalidade")
fimescolha
ate opcao =5
fimalgoritmo
Pergunta
Maxwell Ruan
Olá boa noite!
estou com uma grande duvida, faço curso de TADS e meu professor quer que nós passemos um código que fizemos em portugol no visualg para a linguagem C, estou muito perdido em como fazer isso.
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.