ABA


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

דרג אמינות חבר זה
   16:44   04.01.03   
אל הפורום  
  חברים אני צריך עזרונת  
 
   אני מנסה להריץ את התוכנה הזו
והיא לא עובדת!!!
היא אמורה למצוא ככה:
אם המספר הוא ראשוני
אם כל הספרות שלו אחת אחת היא ראשונית
המספר הוא דו ספרתי...
אם ההפרש הוא ראשוני

הנה היא:


program rishon;
var
v,x,y,j,a,b,rishoni,a_rishoni,b_rishoni,i,hefresh,hefresh_r:integer;
begin
a:=0;
b:=0;
hefresh_r:=0;
rishoni:=0;
a_rishoni:=0;
b_rishoni:=0;
hefresh:=0;
for i:=10 to 99 do
begin
for j:=2 to i div 2 do
if i mod j=0 then
rishoni:=1;
a:=i mod 10;
b:=i div 10;
for x:=2 to a div 2 do
if a mod x=0 then
a_rishoni:=1;
for y:=2 to b div 2 do
if a mod y=0 then
b_rishoni:=1;
if a>b then
hefresh:=a-b;
if b>a then
hefresh:=b-a;
for v:=2 to hefresh div 2 do
if hefresh mod v=0 then
hefresh_r:=1;
if (rishoni=0) and (a_rishoni=0) and (b_rishoni=0) and (hefresh_r=0) then
writeln(i);
end;
end.

זה לא כותב כלום...


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

  האשכול     מחבר     תאריך כתיבה     מספר  
  למטה למטה בתנאים של if תוריד תא הסוגריים no_angel 04.01.03 23:09 1
     אי אפשר לעשות and בלי סוגרים ChampZx 05.01.03 13:00 2
         להיפך חסרים לך סוגריים! dryice 05.01.03 19:16 3
             לא מובן? ChampZx 06.01.03 16:37 4
             ממתי? liranr 06.01.03 16:50 5
                 נכון וזה מה שעשיתי ChampZx 09.01.03 23:22 6

       
no_angel
חבר מתאריך 20.3.02
4989 הודעות, דרג אמינות חבר זה
   23:09   04.01.03   
אל הפורום  
  1. למטה למטה בתנאים של if תוריד תא הסוגריים  
בתגובה להודעה מספר 0
 
  


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

דרג אמינות חבר זה
   13:00   05.01.03   
אל הפורום  
  2. אי אפשר לעשות and בלי סוגרים  
בתגובה להודעה מספר 1
 
  


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

דרג אמינות חבר זה
   19:16   05.01.03   
אל הפורום  
  3. להיפך חסרים לך סוגריים!  
בתגובה להודעה מספר 2
 
   התנאי לif צריך כולו להיות בסוגריים וכן למען הסר ספק לרוב כדאי
שכל and בין שני ביטויים יהיה עטוף בעצמו אם כי זה לא עקרוני.
(מה התוכנית אמורה לעשות? זה מתחיל כאילו אתה מזהה ראשוניים
ואז נהיה לא ברור מה אתה מנסה)

DRYICE


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

דרג אמינות חבר זה
   16:37   06.01.03   
אל הפורום  
  4. לא מובן?  
בתגובה להודעה מספר 3
 
   למה לא?
התוכנית מראה פה את הפילוג של המספר לשני מספרים
ובדיקה של כל אחד מהם
ובדיקה של ההפרש שלהם


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

דרג אמינות חבר זה
   16:50   06.01.03   
אל הפורום  
  5. ממתי?  
בתגובה להודעה מספר 3
 
   דרייס, אני יודע שאתה יודע פסקל יותר מרוב האנשים במדינה הזאת,
ובטח יותר מכל הגולשים בפורום הזה, אבל הפעם זה פשוט לא נכון.
אין שום חובה לתחום את התנאי כולו בסוגריים. ולראיה, דוגמאות
מתוך קובץ העזרה של turbo pascal:

if (I<Min) or (I>max) then...
if ParamCount<>2 then...


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

דרג אמינות חבר זה
   23:22   09.01.03   
אל הפורום  
  6. נכון וזה מה שעשיתי  
בתגובה להודעה מספר 5
 
  


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

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

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



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