to check whether the entered number is armstrong or not.
thanx!
You're Browsing As A Guest! Register Now... |
||
|
Become a VB.NET Expert!
Join 415,717 VB.NET Programmers for FREE! Get instant access to thousands
of VB.NET experts, tutorials, code snippets, and more! There are 831 people online right now.Registration is fast and FREE... Join Now!
|
||
Reply



Posted 03 January 2008 - 02:25 AM
dim num, div as integer
sub main ()
writeline("enter the number")
num=readline()
div=2
while(div<num)
if(num mod div = 0)
writeline("num is non prime")
read()
exit sub
end if
div=div+1
end while
writeline("number is prime")
read()
This post has been edited by PsychoCoder: 04 January 2008 - 09:10 PM
Posted 04 January 2008 - 06:43 PM
label1.text = Num.tostring
label1.text = label1.text & ControlChars.NewLine & Num.tostring
This post has been edited by ferrari12508: 04 January 2008 - 06:45 PM
Reply

