Банковская система

Создай банк с двумя видами счетов. Каждая операция возвращает словарь результата {"ok": bool, "message": String}; предоставленный код выводит его как OK: MESSAGE или Failed: MESSAGE. Все суммы имеют тип float, а каждая сумма в сообщении указывается с двумя знаками после десятичной точки и символом $.

Transaction в transaction.gd: конструктор принимает kind ("deposit", "withdrawal" или "interest") и amount. _to_string() возвращает вид операции с заглавной первой буквой, а затем сумму: Deposit - $200.00. Транзакция не хранит информацию о своём счёте.

Account в account.gd — класс @abstract:

• Конструктор принимает account_number, owner_name и initial_balance. Деньги хранятся в закрытом поле _balance; balance — свойство только для чтения, геттер которого возвращает _balance. _history — это Array[Transaction], а get_history() возвращает его.
• Два абстрактных метода: account_type() -> String и withdrawal_error(amount: float) -> String, который возвращает причину отказа в снятии средств или "".
• deposit(amount): если сумма равна 0 или меньше, операция завершается ошибкой с сообщением Deposit amount must be positive. В противном случае метод добавляет деньги, записывает транзакцию deposit и возвращает Deposited $A. New balance: $B.
• withdraw(amount): если сумма равна 0 или меньше, операция завершается ошибкой с сообщением Withdrawal amount must be positive; непустой результат withdrawal_error() также приводит к ошибке, и её текст возвращается. В противном случае метод снимает деньги, записывает транзакцию withdrawal и возвращает Withdrew $A. New balance: $B, а если баланс теперь ниже 0, добавляет в конце (Overdraft).
• _to_string() возвращает TYPE NUMBER (OWNER): $BALANCE.

SavingsAccount в savings_account.gd наследуется от Account и содержит константы INTEREST_RATE = 0.02 и MIN_BALANCE = 100.0. Тип счёта — Savings. В снятии средств, после которого останется сумма меньше MIN_BALANCE, отказывают с сообщением Cannot withdraw below minimum balance of $100.00. apply_interest() добавляет balance * INTEREST_RATE, записывает транзакцию interest и возвращает Applied interest: $I. New balance: $B.

CheckingAccount в checking_account.gd наследуется от Account и содержит константу OVERDRAFT_LIMIT = 200.0. Тип счёта — Checking. Баланс может опуститься до -200.00; в снятии средств, после которого он станет ещё меньше, отказывают с сообщением Cannot exceed overdraft limit of $200.00.

Bank в bank.gd хранит счета в закрытом словаре, где ключом является номер счёта:

• Конструктор принимает bank_name.
• create_account(kind, account_number, owner_name, initial_balance) — фабричный метод: kind — это savings или checking, регистр букв может быть любым. Метод завершается ошибкой с сообщением Account number already exists или Invalid account type; в противном случае возвращает Savings account created successfully (или Checking).
• get_account(account_number) -> Account возвращает счёт или null.
• transfer(from_number, to_number, amount): метод завершается ошибкой с сообщением One or both accounts not found; снимает деньги с первого счёта и, если эта операция завершается ошибкой, возвращает Transfer failed: вместе с сообщением об ошибке снятия. В противном случае метод вносит деньги на второй счёт и возвращает Transferred $A from FROM to TO.
• total_holdings() -> float возвращает сумму всех балансов.

Предоставленный код считывает название банка, а затем команды. Для этого ввода:

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

вывод будет таким:

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

Твой код нужно поместить в transaction.gd, account.gd, savings_account.gd, checking_account.gd и bank.gd. В main.gd находится предоставленный код ввода/вывода, его нельзя редактировать.