Вывести на экран те компоненты файла, которые являются простыми числами - VB
Формулировка задачи:
Помогите пожалуйстаааааа решить задачу в Visual Basic 6.0. Записать в файл N-первых нечетных чисел.Вывести на экран те компоненты файла,которые являются простыми числами
Решение задачи: «Вывести на экран те компоненты файла, которые являются простыми числами»
textual
Листинг программы
Sub main()
HomeDir$=App.Path
fo%=FreeFile()
Open HomeDir$+"\odd.txt" For output As #fo%
n%=Val(InputBox("n="))
For i%=1 to n%
print #fo%,2*(i%-1)+1
Next i%
close #fo%
End Sub