以下是用易語言編寫的一段程式碼，可以輸出兩個加數在50以內（可以自己調整）的所有符合條件等式。

。版本 2

。支援庫 spec

。程式集 視窗程式集_啟動視窗

。子程式 _按鈕1_被單擊

。區域性變數 i， 整數型

。區域性變數 j， 整數型

。計次迴圈首 （50， i）

。如果真 （求平方根 （i） － 取整 （求平方根 （i）） ＝ 0）

。計次迴圈首 （50， j）

。如果真 （求平方根 （j） － 取整 （求平方根 （j）） ＝ 0）

除錯輸出 （“根號” ＋ 到文字 （i） ＋ “+根號” ＋ 到文字 （j） ＋ “=根號” ＋ 到文字 （求次方 （求平方根 （i） ＋ 求平方根 （j）， 2）））

。如果真結束

。計次迴圈尾 （）

。如果真結束

。計次迴圈尾 （）

以下為執行結果

開始執行被除錯程式

* “√1+√1=√4”

* “√1+√4=√9”

* “√1+√9=√16”

* “√1+√16=√25”

* “√1+√25=√36”

* “√1+√36=√49”

* “√1+√49=√64”

* “√4+√1=√9”

* “√4+√4=√16”

* “√4+√9=√25”

* “√4+√16=√36”

* “√4+√25=√49”

* “√4+√36=√64”

* “√4+√49=√81”

* “√9+√1=√16”

* “√9+√4=√25”

* “√9+√9=√36”

* “√9+√16=√49”

* “√9+√25=√64”

* “√9+√36=√81”

* “√9+√49=√100”

* “√16+√1=√25”

* “√16+√4=√36”

* “√16+√9=√49”

* “√16+√16=√64”

* “√16+√25=√81”

* “√16+√36=√100”

* “√16+√49=√121”

* “√25+√1=√36”

* “√25+√4=√49”

* “√25+√9=√64”

* “√25+√16=√81”

* “√25+√25=√100”

* “√25+√36=√121”

* “√25+√49=√144”

* “√36+√1=√49”

* “√36+√4=√64”

* “√36+√9=√81”

* “√36+√16=√100”

* “√36+√25=√121”

* “√36+√36=√144”

* “√36+√49=√169”

* “√49+√1=√64”

* “√49+√4=√81”

* “√49+√9=√100”

* “√49+√16=√121”

* “√49+√25=√144”

* “√49+√36=√169”

* “√49+√49=√196”

被除錯易程式執行完畢