בעיה של תוכנית - פסקל

[help help]

בעיה של תוכנית - פסקל

שלום, השאלה היא: עליך לקלוט לתוך מערך A מס' חיוביים ולשים באותו מערך את ההפרשים בין כל זוג. לא הבנתי מה זאת אומרת ההפרשים בין כל זוג. המערך לדוגמה: 6 5 4 3 2 1 ---------------------- 9 2 8 5 6 3 האם ההפרש הוא בין 1 ו 2, 3 ו 4, 5 ו 6 או 1 ו 2, 2 ו 3, 3 ו4, 4 ו 5, 5 ו 6 ? והאם מישהו יכול לעזור לי לכתוב תוכנית כזאת. תודה מראש.

 

[liorst99]

זה אמור לעזור ../images/Emo13.gif

program test; Type myArr = Array[1..6] of Integer; Var arr,diff : myArr; i : Integer; Begin For i:=1 To 6 Do arr := i*2; For i:= 1 To 5 Do diff := arr[i+1]-arr; For i:= 1 To 5 Do Write(diff,' '); End.

 

[help help]

תודה על העזרה אבל יש משהו שלא למדתי

1. TYPE. 2. לא למדתי שני מערכים, רק מערך אחד. האם אפשר לעשות את התוכנית עם מערך אחד? בתודה מראש.

 

[*איתי*]

אפשר, וזו היתה הכוונה

1. אתה קולט את כל המספרים 2. עובר בלולאה על כל המספרים מהראשון עד לאחד לפני האחרון. 3. בלולאה אתה מחשב את ההפרש בין a ל-a[i+1] ומציב את ההפרש לa 4. בסוף התהליך יש לך מערך עם כל ההפרשים בין כל המספרים, כאשר בתא האחרון נותר לך המספר האחרון שקלטת למערך. בהצלחה

 

[*איתי*]

כמובן שאתה מחשב את ההפרש

האבסולוטי

 

[help help]

תודה רבה ../images/Emo13.gif