210 likes | 308 Views
מבני בקרה. “אם השמאל ואימנה ואם הימין ואשמאילה”. הסתעפות. סדרה - sequence. s 2. s 1. בחירה - selection. s 2. תנאי. s 1. איטראציה - iteration בצע עד. s 1. תנאי. איטראציה - iteration כל עוד. s 1. תנאי. קצת ייחס!. A = B A > B A >= B A <= B A <> B. הסתעפות. s1. תנאי.
E N D
“אם השמאל ואימנה ואם הימין ואשמאילה” הסתעפות מבוא לתכנות למנע"ס - שבוע מספר 3 - מאיר קומר - סמסטר ב' - תשס"ו
סדרה - sequence s2 s1 מבוא לתכנות למנע"ס - שבוע מספר 2 - מאיר קומר - סמסטר ב' - תשס"ו
בחירה - selection s2 תנאי s1 מבוא לתכנות למנע"ס - שבוע מספר 2 - מאיר קומר - סמסטר ב' - תשס"ו
איטראציה - iterationבצע עד s1 תנאי מבוא לתכנות למנע"ס - שבוע מספר 2 - מאיר קומר - סמסטר ב' - תשס"ו
איטראציה - iterationכל עוד s1 תנאי מבוא לתכנות למנע"ס - שבוע מספר 2 - מאיר קומר - סמסטר ב' - תשס"ו
קצת ייחס! A = B A > B A >= B A <= B A <> B מבוא לתכנות למע"ס - מאיר קומר - סמסטר ב'- תשס"ו - מצגת סיכום
הסתעפות s1 תנאי If תנאי Then פקודה If a = 0 Then b =7 אפשר גם If a = 0 Then b =7 End If מבוא לתכנות למנע"ס - שבוע מספר 3 - מאיר קומר - סמסטר ב' - תשס"ו
דוגמא קצרה Module Module1 Sub Main() Dim x As Boolean = 2 > 2 Dim y As Boolean = 1 Console.WriteLine(x) 'What will this do? Console.WriteLine(y) 'What will this do? Console.ReadKey() End Sub End Module
לוגיקה פשוטה Module Module1 Sub Main() Dim x As Char x = Console.ReadLine() If (x = "A") Then Console.WriteLine("A is for Apple") ElseIf (x = "B") Then Console.WriteLine("B is for Boy") Else Console.WriteLine("Not defined") End If Console.ReadKey() End Sub End Module
מה זה יעשה? Module Module1 Sub Main() Dim grade As Integer grade = Console.ReadLine() If (grade >= 90) Then Console.WriteLine("you got an A") ElseIf (grade >= 80) Then Console.WriteLine("you got an B") ElseIf (grade >= 70) Then Console.WriteLine("you got an C") ElseIf (grade >= 60) Then Console.WriteLine("you got an D") Else Console.WriteLine("you failed") End If Console.ReadKey() End Sub End Module
זכור! שקר=0 פעולות לוגית AND OR NOT מבוא לתכנות למנע"ס - שבוע מספר 3 - מאיר קומר - סמסטר ב' - תשס"ו
Shakespeare Module Module1 Sub Main() Dim ToB As Boolean = True 'Or false! Dim question As Boolean = ToB Or Not ToB Console.WriteLine("That is the question " & question) Console.ReadKey() End Sub End Module
AND True False False False מבוא לתכנות למנע"ס - שבוע מספר 3 - מאיר קומר - סמסטר ב' - תשס"ו
OR True True True False מבוא לתכנות למנע"ס - שבוע מספר 3 - מאיר קומר - סמסטר ב' - תשס"ו
Module Module1 Sub Main() Dim grade As Integer grade = Console.ReadLine() If (grade >= 90) Then Console.WriteLine("you got an A") End If If (grade >= 80) Then Console.WriteLine("you got an B") End If If (grade >= 70) Then Console.WriteLine("you got an C") End If If (grade >= 60) Then Console.WriteLine("you got an D") End If If (grade < 60) Then Console.WriteLine("you failed") End If Console.ReadKey() End Sub End Module זה לא יעבודלמה???
Module Module1 Sub Main() Dim grade As Integer grade = Console.ReadLine() If (grade >= 90 And grade <= 90) Then Console.WriteLine("you got an A") End If If (grade >= 80 And grade < 90) Then Console.WriteLine("you got an B") End If If (grade >= 70 And grade < 80) Then Console.WriteLine("you got an C") End If If (grade >= 60 And grade < 70) Then Console.WriteLine("you got an D") End If If (grade < 60) Then Console.WriteLine("you failed") End If Console.ReadKey() End Sub End Module זה הכי טובלמה???
Module Module1 Sub Main() Dim grade As Integer grade = Console.ReadLine() If (grade >= 90) Then Console.WriteLine("you got an A") ElseIf (grade >= 80) Then Console.WriteLine("you got an B") ElseIf (grade >= 70) Then Console.WriteLine("you got an C") ElseIf (grade >= 60) Then Console.WriteLine("you got an D") Else Console.WriteLine("you failed") End If Console.ReadKey() End Sub End Module זה הרבה יותר טובלמה???
IF בתוךIF Module Module1 Sub Main() Dim x, y As String x = Console.ReadLine() If (x = "A") Then Console.WriteLine("Now enter something else") y = Console.ReadLine If (y = "B") Then Console.WriteLine("Good") ‘Console.ReadKey() why is this bad? Else Console.WriteLine("Bad") ‘Console.ReadKey() why is this bad? End If Else Console.WriteLine("Not Defined") ‘Console.ReadKey() why is this bad? End If Console.ReadKey() End Sub End Module
פונקציות מתמטיות Imports System.Math Module Module1 Sub Main() Dim x As Decimal = Math.Abs(-10.4) Dim y As Decimal Console.WriteLine("I will find the square root of a number") y = Console.ReadLine() Console.WriteLine("The absolute value is " & x) Console.WriteLine("The value of PI is " & Math.PI) Console.WriteLine("The square root of " & y & " is " & Math.Sqrt(y)) Console.WriteLine("2 to the 4.5 power is " & Math.Pow(2, 4.5)) Console.ReadKey() End Sub End Module
סיכום • אופרטור לוגי מחזיר ערך אמת או שקר בלבד • אופרטור וגם ( AND) מחזיר אמת אם שני הביטויים משני הצדדים של האופרטור אמת • אופרטור או ( OR ) מחזיר אמת אם אחד מהביטויים משני הצדדים של האופרטור אמת • אופרטור שלילה הלוגי ( NOT ) הופך את ערכו הלוגי של ביטוי הלוגי מימינו. • ביטוי אמת מחזיר את הערך 1 וביטוי שקר מחזיר 0 מבוא לתכנות למנע"ס - שבוע מספר 3 - מאיר קומר - סמסטר ב' - תשס"ו