(Free Pascal)
Простой калькулято на основе Обратной Польской Записи (ОПЗ/RPN), способный считать значения выражений с комплексными числами.
Маленькое ограничение: между всеми токенами надо ставить пробелы (комплексное число может считаться за один токен):
- Приемлимое выражение: 4+2i * ( 2-1i + 3 )
- Неприемлимое выражение: 4+2*3
Определения:
Код можно разбить на 5 основных частей:
- Определения констант и типов данных, разъяснения;
- Определение операций над базовыми структурами (стек, список, узлы);
- Преобразование строки обычного выражения в строку, записанную по правилам ОПЗ;
- Преобразование строки, записанной по ОПЗ в "вычисляемое выражение" (ВВ);
- Вычисление ВВ.
Преобразование строки в строку-ОПЗ происходит ровно по тем правилам, что написаны в определении ОПЗ. После преобразования строки-ОПЗ в ВВ оно выглядит следующим образом:
Последующая задача программы лишь состоит в том, чтобы пройти по всему списку от начала до конца, и обработать каждую в соответствие с её типом. Все промежуточные результаты сохраняются в отдельный список, т.к. еще необходимы на этапе расчетов, но по окончании сразу удаляются.
Переменные для удобства изменения значения хранятся следующим образом:
То есть, у нас есть одна "супер-переменная", в которой хранится значение, к этой переменной мы обращаемся, если хотим изменить значение, в самом вычислении она не участвует. Простые переменные лишь ссылаются на "супер-переменную", но участвуют в вычислении.