10 lines
161 B
Text
10 lines
161 B
Text
|
OpenConsole()
|
||
|
|
PrintN("Following Doors are open:")
|
||
|
|
For i = 1 To 100
|
||
|
|
root.f = Sqr(i)
|
||
|
|
If root = Int(root)
|
||
|
|
Print (Str(i) + ", ")
|
||
|
|
EndIf
|
||
|
|
Next
|
||
|
|
Input()
|