Do Until Statments

The Number enterd is 100

25

The Code

<% dim number1, gpaf

number1 = 100

Do Until ((number1 Mod 2) = 1)
number1 = number1 \ 2

%>
<br />
<%
Loop
Response.Write(number1)

%>

</form>