请教2道QBASIC编程题，急！！！！

来源：百度知道 编辑：UC知道 时间：2024/06/07 19:37:52
1.打印1～1000内的所有偶数
2.输入正整数N,请输出N的所有因子
请用if……then和for i=……to……，next i语言编写，实在没办法也可以用其他的，表示感谢！！

1：
打印1～1000内的所有偶数:
CLS
FOR I=2 TO 1000 STEP 2
PRINT I,
NEXT I
END

2:输入正整数N,请输出N的所有因子:
CLS
INPUT N
FOR I=1 TO N
IF INT(N/I)=N/I THEN
PRINT I,
END IF
NEXI I
END

那个学校还学这们没用的语言！放弃不学了