רוטר - שאלה בפקודה בפסקל

יומן פעילות	לוח שנה	מבזקי חדשות	תקנון	RSS	כותרות	כותרות לפי תגובה	ניקוי קוקיז	IP	להורדת אפליקציה
eBay	AliExpress	GearBest	Amazon	Booking	Kiwi	SkyScanner	Trip Advisor

"שאלה בפקודה בפסקל"

גירסת הדפסה

קבוצות דיון פיתוח, תיכנות ובניית אתרים נושא #11683	מנהל סגן המנהל מפקח Winner צל"ש מומחה

אשכול מספר 11683

Kwain

דרג אמינות חבר זה

21:45 13.01.05

שאלה בפקודה בפסקל

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

משהו יכול לעזור לי עם זה בבקשה?

שתף

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

האשכול	מחבר	תאריך כתיבה	מספר
אני הייתי הולך על מערך oO	Dark Megical	14.01.05 08:49	1
חח הנה פתרון מצחיק	xTazy	14.01.05 12:57	2
אתה רציני? ממש ממש ממש ממש ממש בלבלתה אותי אפשר בבקשה הסבר?	Kwain	14.01.05 13:05	3
לא הייתי חושב יותר מדי - לך על מערך ומהר..	Grass-Boyy	14.01.05 15:27	4
אתם השתגעתם???	Dudenland	15.01.05 12:19	5
כולם טעו	PhoeNiX	15.01.05 23:10	6
נכון המספר הראשון הוא 1000 אבל מה הבעיה..	Extaza	16.01.05 15:33	7
צודק, אין טעם להסתבך יותר מידיי...	BasketBoy	16.01.05 16:53	8
יש עוד אפשרות נחמדה שהשתמשתי בה פעם...	Gold Dragon	23.01.05 22:54	9

Dark Megical

דרג אמינות חבר זה

08:49 14.01.05

1. אני הייתי הולך על מערך oO
בתגובה להודעה מספר 0

ערכתי לאחרונה בתאריך 14.01.05 בשעה 08:49 בברכה, Dark Megical

של ארבעה מקומות.
הייתי מציב 1 בכולם
ומתחיל להעלות את האיבר הרביעי כל הזמן
אם הרביעי עבר את ארבע - הוא יחזור להיות אחד - והמספר במקום השלישי יהפוך לשתיים
וכך כל פעם.
כשהאיבר השלישי עבר את ארבע אז האיבר השני במערך הופך ל2 והאיבר השלישי הופך והשלישי חוזר לאחד וכך האלה...

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

xTazy

דרג אמינות חבר זה

12:57 14.01.05

2. חח הנה פתרון מצחיק
בתגובה להודעה מספר 0

ערכתי לאחרונה בתאריך 14.01.05 בשעה 12:59 בברכה, xTazy

program wohoo;
var
i,ii,iii,iiii:integer;
Begin
for i:=0 to 9 do
for ii:=0 to 9 do
for iii:=0 to 9 do
for iiii:=0 to 9 do
writeln(i,ii,iii,iiii);
End.

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

Kwain

דרג אמינות חבר זה

13:05 14.01.05

3. אתה רציני? ממש ממש ממש ממש ממש בלבלתה אותי אפשר בבקשה הסבר?
בתגובה להודעה מספר 0

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

Grass-Boyy
חבר מתאריך 9.6.03
3603 הודעות, דרג אמינות חבר זה

15:27 14.01.05

4. לא הייתי חושב יותר מדי - לך על מערך ומהר..
בתגובה להודעה מספר 0

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

Dudenland

דרג אמינות חבר זה

12:19 15.01.05

5. אתם השתגעתם???
בתגובה להודעה מספר 0

מה קפצתם פה ללולאות עם מערכים ו... מממההה ?!?!?!

פשוט מאוד. לולאה שרצה מ-0 ועד 9999... אין יותר פשוט מזה...

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

PhoeNiX
חבר מתאריך 1.8.02
10919 הודעות, דרג אמינות חבר זה

23:10 15.01.05

6. כולם טעו
בתגובה להודעה מספר 0

ערכתי לאחרונה בתאריך 15.01.05 בשעה 23:13 בברכה, PhoeNiX

המספר בעל 4 ספרות הראשון הוא 0000
לכן הייתי קודם קובע את המשתנה מסוג CHAR...
הינה התוכנית:

Program Codes;
Var
i,code:integer;
Begin
code:=1000;
for I:=1000 to 9999 do
begin
code:=succ(code);
writeln(code);
end;
end.

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

Extaza
חבר מתאריך 18.3.02
665 הודעות, דרג אמינות חבר זה

15:33 16.01.05

7. נכון המספר הראשון הוא 1000 אבל מה הבעיה..
בתגובה להודעה מספר 6

לעשות פשוט

program codes;
var
i:integer;
begin
i:=0;
for i:=1000 to 9999 do writeln(i);
end;

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

BasketBoy
חבר מתאריך 1.8.02
330 הודעות, דרג אמינות חבר זה

16:53 16.01.05

8. צודק, אין טעם להסתבך יותר מידיי...
בתגובה להודעה מספר 7

רק תמחק את ה i:=0; ...
שיהיה ככה

program codes;
var
i:integer;
begin
for i:=1000 to 9999 do writeln(i);
end;
בברכה,
אלון.

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

Gold Dragon

דרג אמינות חבר זה

22:54 23.01.05

9. יש עוד אפשרות נחמדה שהשתמשתי בה פעם...
בתגובה להודעה מספר 6

אפשר להתייחס ערכים כמספר(int) לרוץ מ-0 על 9999 ואז פשוט לעשות כמה בדיקות קטנות במידה והמספר קטן מ-10 להדפיס ככה:

printf("%d",000i);

אותו דבר אם קטן מ-100 רק שאז שני אפסים וקטן מ-1000 אלף אחד...

נראה לי קיבלתי על התרגיל הזה בונוס על מקוריות חח..

(ניהול: מחק תגובה)

מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד