Sistema bancario

Crea una banca con due tipi di conto. Ogni operazione restituisce un dizionario di risultato {"ok": bool, "message": String}; il codice fornito lo stampa come OK: MESSAGE oppure Failed: MESSAGE. Tutti gli importi sono float e ogni importo in un messaggio ha due cifre decimali dopo un $.

Transaction in transaction.gd: il costruttore accetta kind ("deposit", "withdrawal" oppure "interest") e amount. _to_string() restituisce il tipo con la prima lettera maiuscola, seguito dall’importo: Deposit - $200.00. Una transazione non memorizza il proprio conto.

Account in account.gd è una classe @abstract:

• Il costruttore accetta account_number, owner_name e initial_balance. Il denaro è conservato in _balance, che è privato; balance è una proprietà di sola lettura il cui getter restituisce _balance. _history è un Array[Transaction] e get_history() lo restituisce.
• Due metodi astratti: account_type() -> String e withdrawal_error(amount: float) -> String, che restituisce il motivo per cui un prelievo viene rifiutato, oppure "".
• deposit(amount): un importo pari a 0 o inferiore non va a buon fine e restituisce Deposit amount must be positive. Altrimenti aggiunge il denaro, registra una transazione deposit e restituisce Deposited $A. New balance: $B.
• withdraw(amount): un importo pari a 0 o inferiore non va a buon fine e restituisce Withdrawal amount must be positive; un withdrawal_error() non vuoto non va a buon fine e restituisce quel testo. Altrimenti preleva il denaro, registra una transazione withdrawal e restituisce Withdrew $A. New balance: $B, seguito da (Overdraft) quando il saldo è inferiore a 0.
• _to_string() restituisce TYPE NUMBER (OWNER): $BALANCE.

SavingsAccount in savings_account.gd estende Account, con le costanti INTEREST_RATE = 0.02 e MIN_BALANCE = 100.0. Il suo tipo è Savings. Un prelievo che lascerebbe un saldo inferiore a MIN_BALANCE viene rifiutato con Cannot withdraw below minimum balance of $100.00. apply_interest() aggiunge balance * INTEREST_RATE, registra una transazione interest e restituisce Applied interest: $I. New balance: $B.

CheckingAccount in checking_account.gd estende Account, con la costante OVERDRAFT_LIMIT = 200.0. Il suo tipo è Checking. Il saldo può scendere fino a -200.00; un prelievo che lo farebbe scendere ulteriormente viene rifiutato con Cannot exceed overdraft limit of $200.00.

Bank in bank.gd conserva i conti in un dizionario privato indicizzato per numero di conto:

• Il costruttore accetta bank_name.
• create_account(kind, account_number, owner_name, initial_balance) è una factory: kind può essere savings oppure checking, indipendentemente dalle maiuscole e minuscole. Restituisce un errore con Account number already exists oppure Invalid account type; altrimenti restituisce Savings account created successfully (oppure Checking).
• get_account(account_number) -> Account restituisce il conto oppure null.
• transfer(from_number, to_number, amount): restituisce un errore con One or both accounts not found; preleva dal primo conto e, se l’operazione non va a buon fine, restituisce un errore con Transfer failed: seguito dal messaggio del prelievo. Altrimenti deposita sul secondo conto e restituisce Transferred $A from FROM to TO.
• total_holdings() -> float restituisce la somma di tutti i saldi.

Il codice fornito legge il nome della banca e poi i comandi. Per questo input:

First Bank
open savings|S1|Alice|1000
open checking|C1|Bob|50
withdraw S1|950
transfer S1|C1|300
withdraw C1|400
history C1
total

l’output è:

OK: Savings account created successfully
OK: Checking account created successfully
Failed: Cannot withdraw below minimum balance of $100.00
OK: Transferred $300.00 from S1 to C1
OK: Withdrew $400.00. New balance: $-50.00 (Overdraft)
History of C1:
1. Deposit - $300.00
2. Withdrawal - $400.00
Total held by First Bank: $650.00

Il tuo codice va inserito in transaction.gd, account.gd, savings_account.gd, checking_account.gd e bank.gd. main.gd contiene il codice fornito per input/output e non può essere modificato.