Ir para conteúdo
Fórum Script Brasil
  • 0

Não consigo fazer me ajudem


jonathan.rocket

Pergunta

Olá boa noite sou iniciante na logica de programação e queria uma ajuda esse exrcício:

· Uma Loja da Cidade esta oferecendo aos seus clientes as seguintes promoções: · Pagamento a vista 50% de desconto

· Pagamento em cheque 40% de desconto

· Pagamento com cheque pré datado 30 dias(20%)

· Pagamento com cheque pré datado 30 e 60 dias(10%)

· Pagamento com cheque pré datado 30 60 e 90 dias(5%)

· Cartão de Credito 30% de desconto

Alem disso cliente cadastrado tem um desconto de 5% adicional

me ajudem por favor é uma trabalho pra amanhã

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

Bem, qual é o seu problema?Vou passar um código em delphi bem explicado para ver se você entende o que estou fazendo.

function Pagamento(Tipo : string;preço : double) : Double;
var
Desconto : Doublle
begin //função que você coloca o tipo de pagamento e ela retorna uma Double
Case Tipo of //um case da string Tipo
'Cheque': begin //se o tipo for cheque
Desconto := preço /100 * 40 //pega o preço e pega 40% dele
Result := preço - Desconto;
end
'Cheque pré datado 1' : begin //cheque pré datado de 30 e 60 dias
Desconto := preço /100 * 10 //pega o preço e pega 10% dele
Result := preço - Desconto;
end
'Cheque pré datado 2' : begin //cheque pré datado de 30 e 60 e 90 dias
Desconto := preço /100 * 5 //pega o preço e pega 5% dele
Result := preço - Desconto;
end
'Cartao de Credito' : begin /Cartão de Crédito
Desconto := preço /100 * 30 //pega o preço e pega 30% dele
Result := preço - Desconto;
end
'A Vista' : begin //a vista
Desconto := preço /100 * 50 //pega o preço e pega 50% dele
Result := preço - Desconto;
end

/ significa dividido

* significa vezes

Result significa o valor que a função vai retornar

:= significa igual

Editado por Ace Stryker™
Link para o comentário
Compartilhar em outros sites

  • 0
Bem, qual é o seu problema?Vou passar um código em delphi bem explicado para ver se você entende o que estou fazendo.

function Pagamento(Tipo : string;preço : double) : Double;
var
Desconto : Doublle
begin //função que você coloca o tipo de pagamento e ela retorna uma Double
Case Tipo of //um case da string Tipo
'Cheque': begin //se o tipo for cheque
Desconto := preço /100 * 40 //pega o preço e pega 40% dele
Result := preço - Desconto;
end
'Cheque pré datado 1' : begin //cheque pré datado de 30 e 60 dias
Desconto := preço /100 * 10 //pega o preço e pega 10% dele
Result := preço - Desconto;
end
'Cheque pré datado 2' : begin //cheque pré datado de 30 e 60 e 90 dias
Desconto := preço /100 * 5 //pega o preço e pega 5% dele
Result := preço - Desconto;
end
'Cartao de Credito' : begin /Cartão de Crédito
Desconto := preço /100 * 30 //pega o preço e pega 30% dele
Result := preço - Desconto;
end
'A Vista' : begin //a vista
Desconto := preço /100 * 50 //pega o preço e pega 50% dele
Result := preço - Desconto;
end

/ significa dividido

* significa vezes

Result significa o valor que a função vai retornar

:= significa igual

Não sou programador Delphi, mas acredito que o sinal ':=', seja de atribuição e não igual (comparação)

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...