miguelsantostb
Membro
Olá. Comecei há uns dias a iniciar-me em pascal e hoje decidi fazer uma calculadora de equações de 1º grau e o programador que utilizei, o freepascal continua a dar um erro de sintaxe dizendo que não pus um ponto-e-vírgula no final de um comando, mas o ponto-e-vírgula está lá. Aqui vai o código:
program Calculadoraequacoes;
Var X,A,B,C :Real;
fim :char;
Begin
Writeln('As equações estão no formato AX+B=C');
Writeln('Por favor digite o valor da A');
Readln(A);
Writeln('Por favor digite o valor de B');
Readln(B);
Writeln('Por favor digite o valor de C');
Readln(C);
X:=(C+B)/A;
Writeln('O X é igual a:', X);
Writeln('Deseja sair?');
Readln(fim);
Until fim:=('Sim')or('sim')or('Ok')or('ok')
End.
Agradeço que me deem um empurrãozinho, por favor.
Obrigado.
program Calculadoraequacoes;
Var X,A,B,C :Real;
fim :char;
Begin
Writeln('As equações estão no formato AX+B=C');
Writeln('Por favor digite o valor da A');
Readln(A);
Writeln('Por favor digite o valor de B');
Readln(B);
Writeln('Por favor digite o valor de C');
Readln(C);
X:=(C+B)/A;
Writeln('O X é igual a:', X);
Writeln('Deseja sair?');
Readln(fim);
Until fim:=('Sim')or('sim')or('Ok')or('ok')
End.
Agradeço que me deem um empurrãozinho, por favor.
Obrigado.