עדיף לעבוד יותר יעיל
שיקצר לך את הריצה בפקטור של פי 12 בזמן... מחפשים את המספר הראשון שמתחלק ב5 וב7, זה באמת בעזרת איזה לולאת while מהסוף, יש מצב שלא יהיה כזה בתחום כללי נניח. אח"כ מנצלים את העובדה הבאה: 5,7 ראשוניים ולכן בפרט הם זרים זה לזה, כלומר מספר מתחלק בשניהם <=> הוא מתחלק במכפלה שלהם, אז מכאן אפשר לעשות לולאת for עד הסוף שכל פעם מורידים את המכפלה של 5 ו 7 (אני לא זוכר אם בפסקל אפשר לשנות את משתנה הלולאה (או אם מותר לעשות את זה בבגרות), מקסימום, מריצים ב while.