10 CLS
20 INPUT"SAYINIZ";N
30 I=1
40 I=I+1:IF I>SQR(N) THEN 60
50 IF N MOD(I)=0 THEN 70  ELSE GOTO 40
60 PRINT N;" ASAL":END
70 PRINT N;" ASAL DE¦˜L"