[Resolvido] Erro de compilação no Pascal
Salve pessoal !
Olhem, eu fiz o código a baixo seguindo o exercício proposto:
(Feito no Dev-Pascal)
{Um cliente de um banco tem um saldo positivo de R$ 500,00. Fazer um algoritmo
que leia um cheque que entrou e calcule o saldo, mostrando(escrevendo) o saldo na tela.}
program saldo_banco;
uses crt;
var
rSaldoPositivo, rChequeEntrada, rSaldoAtual: real;
resposta: string[3];begin
rSaldoPositivo := 500;
writeln('O seu saldo atual esta em: R$',rSaldoPositivo:6:2,' positivos.');
write('Valor de entrada do cheque: R$');
readln(rChequeEntrada);
writeln('O valor depositado foi: R$',rChequeEntrada:6:2);
write('O valor depositado esta correto, sim ou nao?');
readln(resposta);
if resposta := ('sim') then
rSaldoAtual := (rSaldoPositivo+rChequeEntrada);
writeln('O saldo atual da conta agora esta em: R$',rSaldoAtual:6:2)
else
write('Favor, reinicia o sistema para calculo correto.');
readkey();end.
Eu dei uma encrementada no algoritmo para ter um maior entretenimento com o usuario.
Só que está dando o seguinte erro: "Fatal: Syntax error, THEN expected but := found"
Traduzindo da pra entender, já tentei mudar mas não deu certo, alguem tem alguma sugestão para dar certo o algoritmo ??
Abraços!
Discussão (10)
Carregando comentários...