{* Задача301 *}

REM basic

' Дано натуральное число N. Получить все такие натуральные Q , что N делится на Q^2 и не делится на Q^3.


CLS
INPUT n
For i = 1 To n
If (n Mod (i ^ 2)) = 0 And (n Mod (i ^ 3))  0 Then f = 1: PRINT  i
Next
 
If f  1 Then PRINT " takih chisel net"
End