- SU.PASCAL.MODULA.ADA (2:5021/2.30) ------------------- SU.PASCAL.MODULA.ADA -
From : Stas Sidorenko 2:5045/6.38 27 Jan 98 18:38:13
To : Dmitriy Kovalevskiy 28 Jan 98 16:21:02
Subj : Calc
-------------------------------------------------------------------------------
Hi-хи Dmitriy Kovalevskiy!
DK> Приветствую тебя All!
DK> Помогите процедурой или функцией для вычисления выражения . Должно
DK> быть +,-,/,* и естественно учитывание скобок . Hа паскале или асме
DK> .
DK> Т.е. s:='12*(2+1)'
DK> procedure(str_formula : string ; var otvet : string or real );
DK> otvet - естественно ответ после вчисления выражения .
писал на коленке, так что..
ну и разумеется ни каких там глупых проверок
зы: для всяких там умных - не пытайтесь мну грить об ошибках, недочетах,
неоптимальности, других - более крутых алгоритмах.. знаю, все знаю, ну попросил
человече - я за 15 минут и накорябал - а он пусть разбирается..
Удачи.
SS.
--- timEd 1.10.g2+
* Origin: Press any key to continue or any other key to reboot (2:5045/6.38)
|