بليييييز بليييييز ابغي مساعده

[2ta]

بسم الله الرحمن الرحيم
.
.
السلام عليكم ورحمه الله وبركاته ,,

مرحبا يا أعضاء منتديات علوم الحاسب الآلي :)

انا عضو يديد ف المنتدى وحبيت منكم المساعده في حل بعض المسائل لاني تعبت وانا ادور حل ف النت فظهر لي المنتدى واشتركت فيه وان شالله الاقي حل لللاسئلة وبغيت الحل يكون موجود قبل يوم الاثنين ف بلييييييز حد يحله لي والسموحه منكم

السؤال الاول :

Table 3.7 gives the year 2000 populations of three New England states. Write a program that calculates the average population and then displays the name of each state and the difference between its population and the average population. The states and their populations should be stored in a text file.
--------------------------------------------------------------------------------------------------
Maine 1275
Massachusetts 6349
Connecticut 3406

Table3.7 : 2000 Population ( in thousands ) of three New England states.


السؤال الثاني :

Write a program to calculate the amount of a server's tip given the amount of the bill and the percentage tip obtained via input dialog boxes. The output should be a complete sentence that reiterates the inputs and gives the resulting tip. For example, if $20 and 15%are the inputs, then the output might read "A 15 percent tip on 20 dollars is 3 dollars"..

[حسين الغافري]

وعليكم السلام ورحمة الله وبركاته

اخوي من شروط المنتدى انك ما تطلب حل اسايمنت او هووم وررك
نحنا ممكن نساعدك ونشرحلك بس ما نعطيك الحل الكامل
لي عودة للشرح

[حسين الغافري]

السؤال الاول ساقوم بشرحه فيما بعد

اما السؤال الثاني
هذا الكود يمكن يفيدك
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


Dim item As Integer
Dim tip As Double

item = InputBox("Enter amount of the bill in dollar ", "Bill")
tip = InputBox(" Enter the percentage tip ", "Tip")

Dim res As Double
res = CInt(item * tip / 100)
MsgBox("A " & tip & " percent tip on " & item & " dollars is " & res & " dollars")
End Sub

[:: لمسات ::]

السؤال الاول ساقوم بشرحه فيما بعد

اما السؤال الثاني
هذا الكود يمكن يفيدك
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


Dim item As Integer
Dim tip As Double

item = InputBox("Enter amount of the bill in dollar ", "Bill")
tip = InputBox(" Enter the percentage tip ", "Tip")

Dim res As Double
res = CInt(item * tip / 100)
MsgBox("A " & tip & " percent tip on " & item & " dollars is " & res & " dollars")
End Sub

كــأن نفس الي اليووم دارسيينه :biggrinclarifils:

[حسين الغافري]

كــأن نفس الي اليووم دارسيينه :biggrinclarifils:

لاني ادرس معكم :harhar1:

[:: لمسات ::]

لاني ادرس معكم :harhar1:

زين مو جنسية الي يدرسنا :cr:

[حسين الغافري]

زين مو جنسية الي يدرسنا :cr:

هندي :vertag:

[حسين الغافري]

بخصوص السؤال الاول
الداتا محفوظة ف ملف والا اليوزر يدخلها ؟ :icon_wink:

[:: لمسات ::]

هندي :vertag:

لا :cf:

وبعدين تدرسنا نفره مو نفر :ap: