ABA


"עזרה בפסקל(תודה רבה לעוזרים !)"
גירסת הדפסה        
קבוצות דיון פיתוח, תיכנות ובניית אתרים נושא #7085 מנהל    סגן המנהל    מפקח   Winner    צל"ש   מומחה  
אשכול מספר 7085
cmboy

   23:14   02.10.03   
אל הפורום  
  עזרה בפסקל(תודה רבה לעוזרים !)  
 
   ערכתי לאחרונה בתאריך 02.10.03 בשעה 23:21 בברכה, cmboy
 
אני רוצה להגריל שתי מספרים בין רחד ל100.....אבל אני רוצה להכריח שהמספר הראשון יהיה גדול מהשנו או שהשני יתחלק בראשון בלי שארית....
איך אני עושה את זה ?
תודה לעוזרים !!!!


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

  האשכול     מחבר     תאריך כתיבה     מספר  
  בדרך השלילה szargel 02.10.03 23:37 1
     נכון no_angel 03.10.03 12:19 2
         לא הבנתי...אפשר שתכתבו לי את הקטעקוד בבקשה !! cmboy 06.10.03 19:24 3
             פחות או יותר משהו כזה szargel 06.10.03 22:34 4
                 תיקון Vidi 07.10.03 13:31 5
                     אופס שכחתי ; הנה התיקון: Vidi 07.10.03 15:06 6
                         תודה לכולם...... cmboy 09.10.03 16:34 7

       
szargel

   23:37   02.10.03   
אל הפורום  
  1. בדרך השלילה  
בתגובה להודעה מספר 0
 
   אחרי שהגרלת את המספר השני, אתה בודק שהוא "תקין", אם לא - אתה מגריל עוד אחד, ועוד אחד, ועוד אחד...


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
no_angel
חבר מתאריך 20.3.02
4989 הודעות
   12:19   03.10.03   
אל הפורום  
  2. נכון  
בתגובה להודעה מספר 1
 
   אתה עושה את זה עם לולאת rpeat שהתנאי הוא שזה לא עוצר עד שהמספר השני הוא כך וכך וכך


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
cmboy

   19:24   06.10.03   
אל הפורום  
  3. לא הבנתי...אפשר שתכתבו לי את הקטעקוד בבקשה !!  
בתגובה להודעה מספר 2
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
szargel

   22:34   06.10.03   
אל הפורום  
  4. פחות או יותר משהו כזה  
בתגובה להודעה מספר 3
 
  

randomize;
a:=random(100)+1;
repeat
b:=random(100)+1;
until a>b;


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
Vidi
חבר מתאריך 1.10.17
591 הודעות
   13:31   07.10.03   
אל הפורום  
  5. תיקון  
בתגובה להודעה מספר 4
 
תיקון אחד:

Until (a>b) or (b mod a = 0)


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
Vidi
חבר מתאריך 1.10.17
591 הודעות
   15:06   07.10.03   
אל הפורום  
  6. אופס שכחתי ; הנה התיקון:  
בתגובה להודעה מספר 5
 
ערכתי לאחרונה בתאריך 07.10.03 בשעה 15:07 בברכה, Vidi
 

Until (a>b) or (b mod a = 0);

זה מה שקורה שלא מתרגלים (מלשון תרגול) :(


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
cmboy

   16:34   09.10.03   
אל הפורום  
  7. תודה לכולם......  
בתגובה להודעה מספר 6
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

תגובה מהירה  למכתב מספר: 
 
___________________________________________________________________

___________________________________________________________________
למנהלים:  נעל | תייק בארכיון | מחק | העבר לפורום אחר | מחק תגובות | עגן אשכול
       



© כל הזכויות שמורות ל-רוטר.נט בע"מ rotter.net