ABA


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

   15:44   04.12.02   
אל הפורום  
  יש לי שאלה בפסקל:  
 
   נתנו לי שיעורים שאלה ואני לא יודע איך לעשות...מישהו יכול לעזור?
זה השאלה:
פתח וישם אלגוריתם אשר הקלט שלו הוא מחיר,נתון כמספר ממשי,והפלט שלו הוא מרכיבי השקלים והאגורות מוצגים בנפרד כמספרים שלמים.
למשל, עבור הקלט 17.25 הפלט יהיה 17 25

בבקשה תעזרו לייייייי


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

  האשכול     מחבר     תאריך כתיבה     מספר  
  בבקשה: Dudenland 04.12.02 16:17 1
     לא איך שרשמת...הנה איך שעשיתי: Eli G 04.12.02 17:26 2
         אתה צריך לעשות אנילאאנוכי 04.12.02 23:02 3
         אופס...שכחתי לכתוב את התוכנית... Dudenland 05.12.02 00:17 4
  אני חושב ככה ותקנו אותי אם אני טועה hbk3 05.12.02 00:26 5
  אני חושב שזה מה שאתה רוצה TheTom 05.12.02 11:53 6
     כמה הערות... dudu15 08.12.02 01:12 7
         יו לושה איזה אידיוט אתה עם הייתה טיפה מבין... Sisqus 08.12.02 16:29 8
             ואם אחרי הנקודה יש יותר מ2 ספרות: gil_soffer1 09.12.02 08:02 9
                 הממ אחי אנחנו רק כיתה י' לא למדנו עוד לולאות Sisqus 11.12.02 20:12 10
                     נו? אני בכיתה י עשיתי 3 יח''ל. ציון סופי: 99:) gil_soffer1 12.12.02 18:24 11
  בקיצור בשביל לפרק פעם עושים עם TheCoolMan 12.12.02 19:01 12

       
Dudenland

   16:17   04.12.02   
אל הפורום  
  1. בבקשה:  
בתגובה להודעה מספר 0
 
   קלוט מחיר למשתנה ממשי X
הצג כפלט את הספרות שאחרי הנקודה במשתנה X
הצג כפלט את הספרות שלפני הנקודה במשתנה X


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

   17:26   04.12.02   
אל הפורום  
  2. לא איך שרשמת...הנה איך שעשיתי:  
בתגובה להודעה מספר 1
 
   http://rotter.net/User_files/nor/3dee1e82152c0acd.txt


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

   23:02   04.12.02   
אל הפורום  
  3. אתה צריך לעשות  
בתגובה להודעה מספר 2
 
   את זה עם MOD ו-DIV


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

   00:17   05.12.02   
אל הפורום  
  4. אופס...שכחתי לכתוב את התוכנית...  
בתגובה להודעה מספר 2
 
   בכל אופן, איך שרשמתי זה נכון, רק שזה האלגוריתם עצמו...שכחתי ליישם אותו (יישום = תוכנית בפסקל)...


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

   00:26   05.12.02   
אל הפורום  
  5. אני חושב ככה ותקנו אותי אם אני טועה  
בתגובה להודעה מספר 0
 
   זה יכול להיות כך:

program x
var
a : real;
begin
writeln ('write a real number');
readln (a);
writeln ('the integer is ', int(a));
writeln ('the fracment is ', frac(a));
readln (a);
end.


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

   11:53   05.12.02   
אל הפורום  
  6. אני חושב שזה מה שאתה רוצה  
בתגובה להודעה מספר 0
 
   אתה צריך להשתמש במוד ודיו...זאת אומרת כדי לחפש את ספרת האחדות אתה רושם:
num1 mod 10
כדי לחפש את העשרות:
(num1 div 10) mod 10
ואת המאות
num1 div 100


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

   01:12   08.12.02   
אל הפורום  
  7. כמה הערות...  
בתגובה להודעה מספר 6
 
   hbk3
זה לא עקרוני... אבל בסוף התוכנית שלך שעשית

readln (a);

אז לא צריך לשים את ה A אפשר לעשות את זה ככה:

readln;

ואז התוכנה פשוט תחכה שתלחץ אנטר... ולא צריך את ה (A)...

ןל TheTom
אסור אף פעם לעשות שימוש ב DIV ו MOD עם מספרים מסוג real !!!!!!
תמיד תזכור את זה ! זה חשוב מאוד !


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

   16:29   08.12.02   
אל הפורום  
  8. יו לושה איזה אידיוט אתה עם הייתה טיפה מבין...  
בתגובה להודעה מספר 7
 
   אבל ככה עושיםא ת זה אני אכתוב בהרחבה בשבילך
הנה כל קטע התוכנית

Program Price;
Uses crt;
Var
b,cost:real;
a:integer;
begin
writeln ('Please enter the cost');
readln (cost);
a:=trunc(cost);
b:=cost-a;
b:=b*100;
writeln ('the No. of integers is: ',a:1,' and the No. of the agorot is: ',b:1:2);
readln;
end.


s22Sisquss33


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

   08:02   09.12.02   
אל הפורום  
  9. ואם אחרי הנקודה יש יותר מ2 ספרות:  
בתגובה להודעה מספר 8
 
  

Program Gil;
Var
cost: real;
a, b: integer;
begin
WriteLn('Please enter the cost');
ReadLn(cost);
a := Trunc(cost);
cost := Frak(cost);
While Frak(cost)>0 do
cost := cost*10;
b := trunc(cost);
WriteLn(a, ' . ', b);
readln;
end.


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

   20:12   11.12.02   
אל הפורום  
  10. הממ אחי אנחנו רק כיתה י' לא למדנו עוד לולאות  
בתגובה להודעה מספר 9
 
   וגם לא frak
s22Sisquss33


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

   18:24   12.12.02   
אל הפורום  
  11. נו? אני בכיתה י עשיתי 3 יח''ל. ציון סופי: 99:)  
בתגובה להודעה מספר 10
 
  


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

   19:01   12.12.02   
אל הפורום  
  12. בקיצור בשביל לפרק פעם עושים עם  
בתגובה להודעה מספר 0
 
   trunc
ופעם אחד עם
fruc או frunc שחכתי איך רושמים את זה וזהו מה אתם מסתבכים????


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

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

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



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