In: Computer Science
Use VB.net to create a loop that posts the first 100 prime numbers. Then, write code to confirm the numbers are prime.
1. CODE TO GENERATE FIRST 100 PRIME NUMBERS:
Imports System
Public Class Test
Public Shared Sub Main()
Dim num, i, j as Integer
Dim b as Boolean
num = 3
b = True
System.Console.WriteLine("Prime number from 1 to 100")
System.Console.WriteLine("2")
For i = 2 To 542
b = true
For j = 2 To Math.Sqrt(num)
If num Mod j = 0 Then
b = False
GoTo Break
End If
Next
break:
If b Then
System.Console.WriteLine(num)
End If
num = num + 1
b = True
Next
System.Console.ReadKey()
End Sub
End Class
OUTPUT:
2. CODE TO CONFIRM THE USER INPUT NUMBERS ARE PRIME:
Imports System
Public Class Test
Public Shared Sub Main()
Dim primeI, primeN as Integer
Dim primeFlag as Boolean
primeN = Int32.Parse(Console.ReadLine())
primeFlag = True
For primeI = 2 To primeN/2
If primeN Mod primeI = 0 Then
primeFlag = False
End If
Next
If primeFlag Then
System.Console.WriteLine("It is prime")
Else
System.Console.WriteLine("It is not prime")
End If
End Sub
End Class