2.
Cls
Input n
For i = 1 To n 
  If n Mod i = 0 Then Print i;
Next i
End
3.
Cls
Input n
Print n \ 100
Print n \ 10 Mod 10
Print n Mod 10
End
4.
Cls
For i = 2 To 14 Step 3
  s = s + i * (i + 1)
Next i
Print s
End