Scribd
Upload
30 views

Practical NO:-6: Name:-Aditi Pahadi Branch:-Syco Roll:-40

Uploaded by

Pranav Wadge
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
30 views

Practical NO:-6: Name:-Aditi Pahadi Branch:-Syco Roll:-40

Uploaded by

Pranav Wadge
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
You are on page 1/ 3

Practical NO:-6

Name:-Aditi Pahadi
Branch:-syco
Roll:-40

 Write a program using while statement to print prime number between 1-100.

Module Module1

Sub Main()
Dim i, j, c As Integer
c = 0
i = 2
While (i <= 100)
j = 2
While (j < i)
If (i Mod j = 0) Then
Exit While
ElseIf (i = j + 1) Then
Console.WriteLine(i)
End If
j = j + 1
End While
i = i + 1
End While
Console.ReadLine()

End Sub

End Module
OUTPUT:-

You might also like