פורסם 2008 בינואר 1317 שנים אני אמור להשלים חומר בפסקל , על רשימה (LIST) עכשיו השלמתי בערך ואני צריך לכתוב תוכנה קצרה הבעיה היא שאני ממש לא מצליח. המשימה הראשונה: כתוב תוכנית שתכיל שתי פרוצדורות: 1. בונה רשימה לפי קלט משתמש. 2. מדפיסה את הרשימה. אני ניסיתי לכתוב תוכנית שעושה את שני הפרוצדורות הנ"ל רק שהם לא יהיו פרוצדורות (זאת אומרת שכול מה שהתוכנית תעשה זה לקלוט רשימה ואז להדפיס אותה) הבעיה היא שממש לא הלך לי הכנסתי את הקלט הבא: 1 2 וזה הדפיס לי 268 ואמר (בבדיקה שעשיתי לפני ההדפסה שהרשימה ריקה - אחרי שניסיתי להכניס בה את הקלט) מישהו יכול לעזור ולכתוב תוכנית שתעשה את זה - ככה אני אבין מה הולך ואיך משתמשים בכלל בפקודות ואז אני אוכל לפתור את שאר הבעיות לבד (בתקווה) [מצטער שאני לא מוסיף את התוכנה שרשמתי אבל זה כי התעצבנתי וסגרתיאת החלון בלי לשמור] תודה ______________________________________________________________________________ program listexe1;uses list1, wincrt;varl:list_type;procedure bulid_list(m: list_type);varp: pos_type;y: list_info_type;ans: char;begin p:=list_anchor(m); writeln('do you want to add a number? y/n'); readln(ans); while (ans='y') do begin writeln('enter number:'); readln(y); list_insert (m,p,y); writeln('do you want to add a number? y/n'); readln(ans); end;end;function how_many(m: list_type):integer;varp: pos_type;counter: integer;begin counter:=0; p:=list_anchor(m); p:=list_next(m,p); while (p<>nil) do begin counter:=counter+1; p:=list_next(m,p); end; how_many:=counter;end;begin list_init (l); bulid_list(l); writeln('how many numbers in the list: ',how_many(l)); readkey;end.]/CODE[
ארכיון
דיון זה הועבר לארכיון ולא ניתן להוסיף בו תגובות חדשות.