' version 16-06-2021
' portado desde Julia

For i As Integer = 1 To 10
    If (i Mod i^2) < 11  Then Print "La puerta"; i^2; " esta abierta"
Next i
Sleep