почти нормальная арифметика

Обсуждение программ nnCron и nnCron LITE

почти нормальная арифметика

Postby AlikasS » Thu, 18 Feb 2010, 16:42

Code: Select all
\ одиночные или равнозначные арифм.операции в привычном виде
\ неодиночные наравнозначные - по порядку, не зависимо от приоритета
\ 1 + 2 + 3 - 5 = .
\ 5 * 2 * 5 / 25 = .
\ работает с теми же условиями и с VALUE переменными
\
\ выполнение операции по порядку, несмотря на приоритет операции
\ 1 + 2 / 3 * 10 + 5 / 5 = - порядок действий: сложение, деление, умножение, сложение, деление

MODULE: normal_arifm
: + NextWord EVALUATE + ;
: - NextWord EVALUATE - ;
: / NextWord EVALUATE / ;
: * NextWord EVALUATE * ;
: = ( а ничего тут не делаем ) ;
;MODULE

: нормаларифм ALSO normal_arifm DEFINITIONS ;
: фортарифм PREVIOUS DEFINITIONS ;

\EOF
примеры
10 VALUE AA
15 VALUE BB
{{ normal_arifm
3 + 5 - 1 = .
AA + BB = .
}} \ возращаемся на предыдущий словарь

\ или

нормаларифм \ переключаемся на словарь с новыми действиями * / - +
3 + 5 - 1 = .
AA + BB = .
фортарифм \ возращаемся на предыдущий словарь
User avatar
AlikasS
 
Posts: 1434
Joined: Wed, 28 Jun 2006, 05:39
Location: Khabarovsk

Return to nnCron forum (Russian)

Who is online

Users browsing this forum: No registered users and 5 guests