חיפוש

עזרה

הרשמה

התחברות

עדכונים

תיכנות
UnderWarrior Forums : תיכנות

נושא: לולאת for בפסקל.

כותב

הודעה

<< נושא קודם | נושא הבא >>

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 01 March 2007 בשעה 18:48

| IP רשוּם

שלום, אני מתחיל בלימודי פסקל והגעתי לחלק של לולאות for, קיבלתי שאלה שאני מתקשה לפתור:

אני צריך להדפיס את הדבר הבא:

#####

AAAAA

#####

AAAAA

#####

AAAAA

וככה הלאה בערך 10 שורות, עכשיו אני צריך לעשות את זה בעזרת לולאות for, אבל זה מדלג על שורה כל פעם, איך אפשר לעשות את זה? או איך אפשר לכתוב את 2 השורות כשורה? אני מנסה לחשוב על דרך אפשרית ולא מצליח. תודה.

חזרה לתחילת העמוד

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 01 March 2007 בשעה 18:56

| IP רשוּם

בעצם הצלחתי, חשבתי לעשות ככה:

אם למשל יש לי 10 שורות כמו למעלה אז לעשות ככה:

קוד:

for i:=1 to 10 do if i mod 2=0 then writeln('AAAAA')
else
writeln('#####');

חזרה לתחילת העמוד

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 01 March 2007 בשעה 18:56

| IP רשוּם

האם זה פתרון יעיל? או שאפשר לעשות את זה בדרך הרבה יותר קלה?

חזרה לתחילת העמוד

shoshan
מנהל האתר

הצטרף / הצטרפה: 16 July 2005
מדינה: Israel
משתמש: מנותק/ת
הודעות: 4637

נשלח בתאריך: 01 March 2007 בשעה 21:22

| IP רשוּם

קוד:

for i:=1 to 5 do
begin
writeln('AAAAA');
writeln('#####');
end;

__________________
עד מתי רשעים יעלוזו?

עַל כֵּן אֶמְאַס וְנִחַמְתִּי עַל עָפָר וָאֵפֶר.

חזרה לתחילת העמוד

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 02 March 2007 בשעה 14:15

| IP רשוּם

אה, אני לא מאמין שלא הצלחתי לחשוב על זה. תודה.

חזרה לתחילת העמוד

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 02 March 2007 בשעה 14:38

| IP רשוּם

יש לי עוד שאלה, למשל אם אני צריך בעזרת לולאת for לכתוב כזה דבר:

###

####

#####

התחלתי ככה אבל זה אומר לי שיש שגיאות, אני לא מבין למה:

קוד:

var i,i2:integer;
c:char;
begin
c:='#';
i2:=0;
for i:=1 to 5 do
begin
i2:=i2+i;
writeln(c*i);
end;
end.

חזרה לתחילת העמוד

shoshan
מנהל האתר

הצטרף / הצטרפה: 16 July 2005
מדינה: Israel
משתמש: מנותק/ת
הודעות: 4637

נשלח בתאריך: 02 March 2007 בשעה 14:59

| IP רשוּם

אתה לא יכול להכפיל מספר במחרוזת

במקום זה אתה יכול לשים לולאה בתוך הלולאה שתספיס מ-1 עד I סולמית אחת.

__________________
עד מתי רשעים יעלוזו?

עַל כֵּן אֶמְאַס וְנִחַמְתִּי עַל עָפָר וָאֵפֶר.

חזרה לתחילת העמוד

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 02 March 2007 בשעה 16:28

| IP רשוּם

הבעיה היא שאני לא מצליח לחשוב על דרך לעשות את זה, כאילו איך אפשר להגיד לתוכנה להדפיס כל פעם לפי ערך מסויים, למשל אם y:=4 אז איך אני אומר לתוכנה שלפי זה תדפיס 4 סולמיות?

חזרה לתחילת העמוד

shoshan
מנהל האתר

הצטרף / הצטרפה: 16 July 2005
מדינה: Israel
משתמש: מנותק/ת
הודעות: 4637

נשלח בתאריך: 02 March 2007 בשעה 17:58

| IP רשוּם

קוד:

for i:=1 to 10 do
  begin
    for j:=1 to i do
        write('#');
    writeln;
  end;

__________________
עד מתי רשעים יעלוזו?

עַל כֵּן אֶמְאַס וְנִחַמְתִּי עַל עָפָר וָאֵפֶר.

חזרה לתחילת העמוד

abc
אורח

הצטרף / הצטרפה: 01 October 2003
משתמש: אונליין
הודעות: 12647

נשלח בתאריך: 02 March 2007 בשעה 18:42

| IP רשוּם

תודה!

חזרה לתחילת העמוד

אם ברצונך להגיב לנושא זה עליך קודם להתחבר
אם אינך רשום/ה כבר עליך להרשם

גרסת הדפסה

אינך יכול/ה לשלוח נושאים חדשים בפורום זה
אינך יכול/ה להגיב לנושאים בפורום זה
אינך יכול/ה למחוק את הודעותיך ותגוביך בפורום זה
אינך יכול/ה לערוך את הודעותיך ותגובותיך בפורום זה
אינך יכול/ה לצור סקרים בפורום זה
אינך יכול/ה להצביע בסקרים בפורום זה