Слово √: различия между версиями

Материал из ПМК вики
Перейти к навигации Перейти к поиску
Строка 21: Строка 21:


== История ==
== История ==
Впервые слово √ под именем SQRT появилось в Форте 1971-73 годах, когда Чак Мур перенёс транслятор на DEC PDP-11 в [https://en.wikipedia.org/wiki/National_Radio_Astronomy_Observatory National Radio Astronomy Observatory] (''англ.'', [https://ru.wikipedia.org/wiki/%D0%A8%D0%B0%D1%80%D0%BB%D0%BE%D1%82%D1%81%D0%B2%D0%B8%D0%BB%D0%BB_%28%D0%92%D0%B8%D1%80%D0%B3%D0%B8%D0%BD%D0%B8%D1%8F%29 Шарлотсвилл]).
Впервые слово √ под именем SQRT появилось в Форте 1971-73 годах, когда Чак Мур перенёс транслятор на DEC PDP-11 в [https://en.wikipedia.org/wiki/National_Radio_Astronomy_Observatory National Radio Astronomy Observatory] (''англ.'', [https://ru.wikipedia.org/wiki/%D0%A8%D0%B0%D1%80%D0%BB%D0%BE%D1%82%D1%81%D0%B2%D0%B8%D0%BB%D0%BB_%28%D0%92%D0%B8%D1%80%D0%B3%D0%B8%D0%BD%D0%B8%D1%8F%29 Шарлотсвилл]). Слово SQRT работало только с целыми числами и получало 16-битный результат из 32-битного аргумента.
 
Слово SQRT работало только с целыми числами и получало 16-битный результат из 32-битного аргумента.


В Форте FSP88 и MMSFORTH слово √ было известно под именем SQR
В Форте FSP88 и MMSFORTH слово √ было известно под именем SQR

Версия от 04:16, 21 марта 2016

Пример работы слова √

(квадратный корень) — стандартное слово Каллисто. Извлечение квадратного корня.

√              ( p -- x )                      Квадратный корень. x ← √p

x — квадратный корень из p. Число p должно быть больше нуля либо равно нулю.

Ввод слова √

В режиме NUM последовательно нажмите две клавиши  F    

Детали реализации

Слово √ является «обёрткой» вокруг команды ЭКВМ F √.

Квадратный корень не определён для отрицательных чисел. Обработка этой ошибки производится встроенной программой. Например, последовательность слов  -1 √  вызывает аварийный останов Каллисто с сообщением «Неверный аргумент» в строке комментариев. Можно ввести с клавиатуры произвольное число в качестве значения «$\sqrt{-1}$» и вернуться в Каллисто, нажав  С/П . Подробнее см. статью Авост Каллисто.

В случае аварийного останова рекомендуется произвести «холодную перезагрузку» Каллисто с удалением всех введённых слов, нажав последовательно клавиши  В/О   С/П .

FSQRT в стандарте ANS Forth

12.6.2.1618   FSQRT                   "f-square-root"              FLOATING EXT
           ( F: r1 -- r2 ) or ( r1 -- r2 )
           r2 - квадратный корень r1. Неопределенная ситуация существует, если 
           r1 - меньше нуля.

История

Впервые слово √ под именем SQRT появилось в Форте 1971-73 годах, когда Чак Мур перенёс транслятор на DEC PDP-11 в National Radio Astronomy Observatory (англ., Шарлотсвилл). Слово SQRT работало только с целыми числами и получало 16-битный результат из 32-битного аргумента.

В Форте FSP88 и MMSFORTH слово √ было известно под именем SQR

Ссылки


  Это заготовка статьи. Вы можете помочь проекту, дополнив её.