the program said has error in the fifth line where?
| Code: |
|
uses crt; var customer-name: string balance valor_debitar, total: Real; begin clrscr; writeln ( 'enter the name of the client'); readln (client_name); writeln ( 'enter the amount of your balance'); readln (balance); writeln ( 'the amount to be debited and'); readln (valor_debitar); total: = (balance) - (valor_debitar); if total <0 then begin write ( 'was negative'); end; write ( 'Total =', total: 5:2); readkey end. |
