Фэндом


Распространённое приложение — программа, эмулирующая калькулятор, т. е. рисующая на экране калькулятор с кнопками, которые можно нажимать мышкой (как правило, можно также нажимать цифровые кнопки на клавиатуре с тем же эффектом). Такая программа удобна для тех, кто привык работать с обычным калькулятором.

На gOrth.Править

#gOrth calculator#
 :begin
 "Wellcome to gOrth calculator!</br>" .
 1 working <-
 doWork wh
 ;
 :input
 "Input first number:" . ,
 "Input second number:" . ,
 ;
 :output
 "result:" . . cr
 ;
 :doWork
 "Input command '+', '-', '*', '/' or 'exit':" .
 , command <-
 command -> "+" -> =s= sum if
 command -> "-" -> =s= dec if
 command -> "*" -> =s= mul if
 command -> "/" -> =s= div if
 command -> exit =s= exit if
 working ->
 ;
 :sum input do + output do ;
 :dec input do - output do ;
 :mul input do * output do ;
 :div input do / output do ;
 :exit 0 working <- ;

 

Обнаружено использование расширения AdBlock.


Викия — это свободный ресурс, который существует и развивается за счёт рекламы. Для блокирующих рекламу пользователей мы предоставляем модифицированную версию сайта.

Викия не будет доступна для последующих модификаций. Если вы желаете продолжать работать со страницей, то, пожалуйста, отключите расширение для блокировки рекламы.

Также на Фэндоме

Случайная вики