ABA


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

דרג אמינות חבר זה
   18:57   07.12.02   
אל הפורום  
  אנשים חייב בעיה בפאסקאל  
 
   כתוב פונקציה המחזירה סכום של כל הספרות של מספר שלפ
תודה רבה


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

  האשכול     מחבר     תאריך כתיבה     מספר  
  הינה: AndreyT 07.12.02 19:36 1
     תודה רבה כלי 07.12.02 19:52 2
     טעות שלי זה בסדר :\ ChampZx 07.12.02 23:47 3
         אתה יכול לנמק בשבילי בבקשה איך היא עובדת... dudu15 08.12.02 01:00 4
             הוכחת נכונות האלגוריתם: dryice 08.12.02 11:10 5
                 תגיד לי שאתה צוחק... liranr 09.12.02 20:40 6
                     אחלה הסבר, מתמטיקה נאה... לא צריך יותר מזה!.. gil_soffer1 10.12.02 15:23 7
                 למה?.... דווקא הבנתי... dudu15 10.12.02 19:26 8
     שכחת לאתחל את sum!! EviLGuY 10.12.02 19:46 9
         הוא לא שכח !!! dudu15 10.12.02 20:33 10

       
AndreyT

דרג אמינות חבר זה
   19:36   07.12.02   
אל הפורום  
  1. הינה:  
בתגובה להודעה מספר 0
 
  

var Num,i,Sum:integer;
begin
readln(num);

while num<>0 do
begin
sum:=sum + num mod 10;
num:=num div 10;
end;

writeln(sum);
end.


אתה יכול להכניס בתוכנית זות מספר בן כמה ספרות שתרצה,
היא לא מוגבלת למספר דו או תלת סיפרתי.


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

דרג אמינות חבר זה
   19:52   07.12.02   
אל הפורום  
  2. תודה רבה  
בתגובה להודעה מספר 1
 
  


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

דרג אמינות חבר זה
   23:47   07.12.02   
אל הפורום  
  3. טעות שלי זה בסדר :\  
בתגובה להודעה מספר 1
 
   עבר עריכה לאחרונה בתאריך 07.12.02 בשעה 23:48
 


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

דרג אמינות חבר זה
   01:00   08.12.02   
אל הפורום  
  4. אתה יכול לנמק בשבילי בבקשה איך היא עובדת...  
בתגובה להודעה מספר 3
 
   לעבור שליו שליו ואפילו אם אפשר אז להדגים...

תודה מראש !


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

דרג אמינות חבר זה
   11:10   08.12.02   
אל הפורום  
  5. הוכחת נכונות האלגוריתם:  
בתגובה להודעה מספר 4
 
   נוכיח את נכונות האלגוריתם לעיל באינדוקציה על האיטרציות
של הלולאה.

הקלט: מספר NUM בן n ספרות.

טענה: לאחר i איטרציות של הלולאה. sum מכיל את סכום i הספרות
הימניות ביותר ו NUM מכיל את n-i הספרות השמאליות ביותר של הקלט.

נוכיח באינדוקציה על i:

בסיס:
כאשר i=0 עוד לא נעשתה שום איטרציה, sum מאותחל לאפס ועל כן
באמת מכיל את סכום אפס הספרות הראשונות. וNUM מכיל את כל המספר
כלומר n מתוך n ספרות שמאליות ביותר. QED

צעד:
נניח כי הטענה נכונה עבור i=k כלשהוא, נוכיח כי הטענה נכונה
עבור i=k+1, כלומר: נניח לאחר k איטרציות sum מכיל את סכום k הספרות
הימניות ביותר, וNUM מכיל את n-k הספרות השמאליות ביותר של הקלט.

הוכחת הצעד:
בלולאה אנו מבצעים:
SUM=SUM+NUM mod 10
NUM mod 10 הוא הספרה הימנית ביותר בNUM שמכיל n-k ספרות שמאליות כלומר
הספרה הימנית ביותר בו היא הספרה הk+1 מהקלט. על פי ההנחה
SUM מכיל את סכום k הספרות הימניות ביותר לאחר פעולה זאת יכיל
את סכום k+1 הספרות הימניות ביותר.
אז אנו מבצעים:
SUM = SUM div 10 כלומר הסר מSUM ספרה אחת מימין היו בSUM
n-k ספרות שמאליות ביותר כעת יהיו בו n-(k+1)
a ספרות שמאליות ביותר.
QED

הוכחנו הטענה לכל i מכאן לאחר n איטרציות sum יכיל את סכום
כל n הספרות.
נותר לבדוק את תנאי העצירה. הלולאה עוצרת כאשר num=0
ואכן לאחר n איטרציות NUM מכיל את n-n=0 הספרות השמאליות ביותר
כלומר אפס ספרות כלומר מכיל אפס. וכן לכל i<n
NUM מכיל n-i>0 ספרות ולכן שונה מאפס.
QED

DRYICE


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

דרג אמינות חבר זה
   20:40   09.12.02   
אל הפורום  
  6. תגיד לי שאתה צוחק...  
בתגובה להודעה מספר 5
 
   הההוכחה כמובן נכונה, אבל אני לא באמת חושב שהסברת לו משהו.
הסבר לא כל כך מתמטי על איך התוכנית עובדת היה יכול להיות שימושי יותר


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

דרג אמינות חבר זה
   15:23   10.12.02   
אל הפורום  
  7. אחלה הסבר, מתמטיקה נאה... לא צריך יותר מזה!..  
בתגובה להודעה מספר 6
 
  


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

דרג אמינות חבר זה
   19:26   10.12.02   
אל הפורום  
  8. למה?.... דווקא הבנתי...  
בתגובה להודעה מספר 5
 
   פשוט עכשיו גם הבנתי את זה לבד... כי מקודם לא היה לי כל כך הרבה זמן...

אבל תודה בכל מקרה...


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

דרג אמינות חבר זה
   19:46   10.12.02   
אל הפורום  
  9. שכחת לאתחל את sum!!  
בתגובה להודעה מספר 1
 
  


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

דרג אמינות חבר זה
   20:33   10.12.02   
אל הפורום  
  10. הוא לא שכח !!!  
בתגובה להודעה מספר 9
 
   לא צריך !!!
בפסקל כל המשתנים מאותחלים כבר לאפס !!!


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

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

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



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