BZU PAGES: Find Presentations, Reports, Student's Assignments and Daily Discussion; Bahauddin Zakariya University Multan Right Header

HOME BZU Mail Box Online Games Radio and TV Cricket All Albums
Go Back   BZU PAGES: Find Presentations, Reports, Student's Assignments and Daily Discussion; Bahauddin Zakariya University Multan > Institute of Computing > Bachelor of Science in Information Technology > BsIT 5th Semester > Visual Programming

Visual Programming Sir Ahsan


Reply
 
Thread Tools Search this Thread Rate Thread Display Modes
  #1  
Old 15-12-2009, 11:05 PM
.BZU.'s Avatar


 
Join Date: Sep 2007
Location: near Govt College of Science Multan Pakistan
Posts: 9,692
Contact Number: Removed
Program / Discipline: BSIT
Class Roll Number: 07-15
.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute.BZU. has a reputation beyond repute
Default Find Sum of Composite Numbers in an Array VB Code (By Sheraz)

Code:
 Module Module1
   
   Sub Main()
   Dim ar As Integer()
  Dim flag As Integer
   Dim sum As Integer = 0
  ar = New Integer() {15, 8, 1, 6, 34, 7, 5, 342, 4, 9}
   
   
   For i = 0 To ar.GetUpperBound(0)
              flag = 0
   For j = 2 To ar(i) / 2   'Divide by 2 because of Mathematics Rule
   If ar(i) Mod j = 0 Then
                      flag = 1
   Exit For 'To make Program more efficient (It is Optional)
   End If
   Next
   If flag = 1 Then
  sum = sum + ar(i)    ' or sum += ar(i)
  End If
   Next
   
          Console.WriteLine("The sum of composite numbers is: {0}", sum)
          Console.ReadLine()
   
   End Sub
   
  End Module
   
  

__________________
(`v)
`*..*`

.*.*) .*)
(.* (.
Bzu Forum

Don't cry because it's over, smile because it happened
Reply With Quote
Reply

Tags
array, code, composite, find, numbers, sheraz, sum


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Program for Linear Search in an Array VB Code (By Sheraz) .BZU. Visual Programming 0 15-12-2009 11:06 PM
Display the Prime Numbers of an Array VB Code (By Sheraz) .BZU. Visual Programming 0 15-12-2009 11:04 PM
Display the Odd Numbers of an Array VB Code (By Sheraz) .BZU. Visual Programming 0 15-12-2009 11:03 PM
Display the Even Numbers of an Array VB Code (By Sheraz) .BZU. Visual Programming 0 15-12-2009 11:02 PM
Find the Average of all elements in an Array VB Code (By Sheraz) .BZU. Visual Programming 0 15-12-2009 11:01 PM

Best view in Firefox
Almuslimeen.info | BZU Multan | Dedicated server hosting
Note: All trademarks and copyrights held by respective owners. We will take action against any copyright violation if it is proved to us.

All times are GMT +5. The time now is 03:41 PM.
Powered by vBulletin® Version 3.8.2
Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.