Сегодня поздравляем всех программистов и парикмахеров!

Полный набор для разработчика:
https://rapidq.phatcode.net/download/index.html

Вот здесь наиболее удобная среда разработки: http://raduino.com/RqWork_v5.zip

Программа возвращает арктангенс числа, при аргументе 1 выдаёт число Пи, код ниже:

'****************************************************************************************************************
$Include "Rapidq.inc"
$Include "Minimize.inc"

'variables declaration
dim PiNumber as double
dim PiConst as double

'functions declaration
DECLARE SUB btnOnClick

Create frmPi as QForm
Caption = "Pi Number Show"
Top = 337
Left = 521
Width = 335
Height = 111

Create lblPi as QLabel
Parent = frmPi
Top = 32
Left = 40
Width = 44
Height = 13
Caption = "Pi"
Color = &HEDE9EB
End Create

Create edtPi as QEdit
Parent = frmPi
Top = 24
Left = 96
Width = 121
Height = 21
Text = "Pi Number"
Color = &HFFFFFF
End Create

Create btn as QButton
Parent = frmPi
Top = 24
Left = 232
Width = 75
Height = 25
Caption = "Calculate"
OnClick = btnOnClick
End Create

End Create

SetMinimize(frmPi)
frmPi.ShowModal

'*****************************************

SUB btnOnClick
PiNumber=val(edtPi.Text)
PiConst=4*ATAN(PiNumber)
edtPi.Text=str$(PiConst)
END SUB
'*******************************************************************************************************************

Вот ещё более простецкий редактор - чисто простой текстовый редактор без заморочек с возможностью запуска написанного кода программы:

https;//qchartist.net/files/index.php?dir=programming/Ressources_RapidQ/EditAide/

Выкачайте всю папку EditAide, запускать надо EditAide.exe

Rapid-Q Basic — это кросcплатформенный BASIC язык с возможностью создания как GUI, так и консольных приложений (включая CGI приложения). Rapid-Q поддерживает Windows 95 / 98 / NT / 2000, Linux / i386, Solaris / Sparc, and HP-UX. Rapid-Q является полностью FreeWare. Rapid-Q поддерживает большинство команд QBasic. Если вы хотя бы немного знакомы с QBasic, изучение Rapid-Q будет несложным. Rapid-Q поддерживает: - визуальное создание форм; - вызовы DLL; - поддерживает MySQL, DirectX, частично Direct3D, Sockets, COM; - объектное программирование и многое другое.
Отсюда: http://raduino.com/RQHelpRu/index.html