عدد از کاربر بگیره مقسوم علیه زوج را نشان بدهد در ویژوال بیسیک 6 basic
S Sajadmohebbi New Member Mar 31, 2019 #1 عدد از کاربر بگیره مقسوم علیه زوج را نشان بدهد در ویژوال بیسیک 6 basic
the_king مدیرکل انجمن Mar 31, 2019 #3 Sajadmohebbi گفت: عدد از کاربر بگیره مقسوم علیه زوج را نشان بدهد در ویژوال بیسیک 6 basic کلیک کنید تا باز شود... کد: Dim n As Integer, i As Integer, s As String n = Val(InputBox("Please enter a number:")) For i = 2 To n Step 2 If (n Mod i) = 0 Then Print i Next
Sajadmohebbi گفت: عدد از کاربر بگیره مقسوم علیه زوج را نشان بدهد در ویژوال بیسیک 6 basic کلیک کنید تا باز شود... کد: Dim n As Integer, i As Integer, s As String n = Val(InputBox("Please enter a number:")) For i = 2 To n Step 2 If (n Mod i) = 0 Then Print i Next