רוטר - תרגיל פסקל עם מערכים (איך לפתור)?

יומן פעילות	לוח שנה	מבזקי חדשות	תקנון	RSS	כותרות	כותרות לפי תגובה	ניקוי קוקיז	IP	להורדת אפליקציה
eBay	AliExpress	GearBest	Amazon	Booking	Kiwi	SkyScanner	Trip Advisor

"תרגיל פסקל עם מערכים (איך לפתור)?"

גירסת הדפסה

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

אשכול מספר 11597

PhoeNiX
חבר מתאריך 1.8.02
10919 הודעות, דרג אמינות חבר זה

22:42 27.12.04

תרגיל פסקל עם מערכים (איך לפתור)?

שלום לכולם,
נתון מערך A המכיל מספרים שלמים. בנה מערך B חדש באופן הבא:
אם סכום שני תאים סמוכים במערך A מתחלק ב-3 אזי הצג במערך החדש (כאילו B) את שני המספרים ובתא השלישי את סכומם. אחרת, הצג את שני המספרים ובא השלישי 0. (הסריקה מתבצעת על זוגות עוקבים של תאים, כאשר כל זוג נבדק פעם אחת).
לדוגמא, אם מערך A הוא: 1, 5, 9, 5 (מימין לשמאל)
אז מערך B יראה כך: 1 , 5, 6, 9, 5, 0 (מימין לשמאל)

תודה!

שתף

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

האשכול	מחבר	תאריך כתיבה	מספר
ממ	hbk3	28.12.04 23:50	1

hbk3

דרג אמינות חבר זה

23:50 28.12.04

1. ממ
בתגובה להודעה מספר 0

program ex;
var
a,b:array of integer;
i,ia,ib:integer;
begin
ib:=1; ia:=1;
For i:=1 to (n div 3+1) do
begin
b:=a;
b:=a;
if (a+a) mod 3 = 0 then
b:=a+a
else
b:=0;
inc(ib,3); inc(ia,2);
end;
end.

(ניהול: מחק תגובה)

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