журнал «Информатика и образование» - Информатика и образование 2010 №07

êàêîãî èíäåêñà ýëåìåíòû äîëæíû ïåðåìåùàòüñÿ? (Íà÷èíàÿ ñ ÷åòâåðòîãî.)
9) Íåîáõîäèìî ïåðåìåùàòü ýëåìåíòû âïðàâî èëè âëåâî? (Ïåðåìåùàòüñÿ ýëåìåíòû äîëæíû âëåâî.)
10) Êàêîé ýëåìåíò äîëæåí áûòü ïåðåìåùåí íà ìåñòî ýëåìåíòà A[i]? (A[i] := A[i + 1].)
for i:=3 to 9 do
A[i]:=A[i+1];

Çàäàíèå äëÿ ãðóïïû 2. Âñòàâêà ýëåìåíòîâ â ìàññèâ.
Çàäàí îäíîìåðíûé ìàññèâ ðàçìåðà 10. Íåîáõîäèìî âñòàâèòü ÷èñëî 5 ïîñëå òðåòüåãî
ýëåìåíòà.
1) Ñêîëüêî ýëåìåíòîâ â ìàññèâå? (10.)
2) Ñêîëüêî ýëåìåíòîâ ñòàíåò â ìàññèâå â ðåçóëüòàòå âñòàâêè ÷èñëà 5 ïîñëå
òðåòüåãî ýëåìåíòà? (11.)
3) Êàêîé èíäåêñ áóäåò ó âñòàâëåííîãî ýëåìåíòà? (4.)
4) ×òî äîëæíî ïðîèçîéòè ñ ýëåìåíòàìè ñ ïåðâîãî ïî òðåòèé? (Ýòè ýëåìåíòû íå
äîëæíû èçìåíèòüñÿ.)
5) Êàêîé ýëåìåíò äîëæåí áûòü ïîìåùåí íà ïÿòîå ìåñòî? (Íà ïÿòîå ìåñòî äîëæåí ïåðåìåñòèòüñÿ ÷åòâåðòûé ýëåìåíò.)
6) Íà øåñòîå? Íà ñåäüìîå? (Íà øåñòîå — ïÿòûé. Íà ñåäüìîå — øåñòîé.)
7) Êàêóþ çàêîíîìåðíîñòü âû ìîæåòå óêàçàòü? (Ýëåìåíòû ñäâèãàþòñÿ âïðàâî.)
8) Ýëåìåíòû ñ êàêèìè èíäåêñàìè îñòàíóòñÿ íåèçìåííûìè, à ñ êàêèìè áóäóò
èçìåíåíû? (Íåèçìåííûìè îñòàíóòñÿ ýëåìåíòû ñ èíäåêñàìè 1—3, íà ÷åòâåðòîå
ìåñòî ïîìåùàåòñÿ ÷èñëî 5, à èçìåíÿþòñÿ âñå îñòàëüíûå.)
9) Íà÷èíàÿ ñ êàêîãî èíäåêñà ýëåìåíòû äîëæíû ïåðåìåùàòüñÿ? (Ïåðåìåùàòüñÿ
äîëæíû ýëåìåíòû ñ ÷åòâåðòîãî.)
10) Íåîáõîäèìî ïåðåìåùàòü ýëåìåíòû âïðàâî èëè âëåâî? (Âïðàâî.)
11) Åñëè íà ÷åòâåðòîå ìåñòî ïîìåñòèòü ïÿòåðêó, ÷òî ïðîèçîéäåò ñ òåì ýëåìåíòîì, êîòîðûé íàõîäèëñÿ äî ýòîãî íà ÷åòâåðòîì ìåñòå? (Åãî çíà÷åíèå ïîòåðÿåòñÿ.)
12) Ïåðåìåùåíèå ëó÷øå íà÷àòü ñ ÷åòâåðòîãî èëè ñ ïîñëåäíåãî ýëåìåíòà? (Ñ ïîñëåäíåãî.)
13) Êàêîé ýëåìåíò äîëæåí áûòü ïåðåìåùåí íà ìåñòî ýëåìåíòà A[i]? (A[i] := A[i – 1].)
for i:=11 downto 5 do
A[i]:=A[i
1];
A[4]:=5;

Çàäàíèå äëÿ ãðóïïû 3. Ïåðåìåùåíèå ýëåìåíòîâ â ìàññèâå.
Çàäàí îäíîìåðíûé ìàññèâ ðàçìåðà 10. Îñóùåñòâèòü ïåðåìåùåíèå ýëåìåíòîâ ìàññèâà ñëåäóþùèì îáðàçîì: ïîñëåäíèé ýëåìåíò çàïèñàòü íà ìåñòî ïåðâîãî, ïðè ýòîì
ñäâèíóâ ïåðâûé, âòîðîé, …, ïðåäïîñëåäíèé ýëåìåíòû íà îäíó ïîçèöèþ âïðàâî.

ÈÍÔÎÐÌÀÒÈÊÀ È ÎÁÐÀÇÎÂÀÍÈÅ, ¹ 7—2010

25

1) Ñêîëüêî ýëåìåíòîâ â ìàññèâå? (10.)
2) Èçìåíèòñÿ ëè êîëè÷åñòâî ýëåìåíòîâ â ìàññèâå ïîñëå ïåðåìåùåíèÿ? (Íåò.)
3) Êàêîé ýëåìåíò äîëæåí îêàçàòüñÿ íà ìåñòå ïåðâîãî? Íà ìåñòå âòîðîãî? Íà
ìåñòå òðåòüåãî? (Äåñÿòûé. Ïåðâûé. Âòîðîé.)
4) Ìîæíî ëè ïîñëåäíèé ýëåìåíò ñðàçó ïîìåñòèòü íà ìåñòî ïåðâîãî? ×òî ñòàíåò
â ýòîì ñëó÷àå ñ ïåðâûì ýëåìåíòîì? (Íåò. Åãî çíà÷åíèå áóäåò ïîòåðÿíî.)
5) Ìîæíî ëè ñíà÷àëà ïåðåìåñòèòü ïîî÷åðåäíî âñå ýëåìåíòû âïðàâî, íà÷èíàÿ
ñ ïåðâîãî, à çàòåì ïîñëåäíèé ýëåìåíò ïîìåñòèòü íà ìåñòî ïåðâîãî? ×òî ñòàíåò â ýòîì
ñëó÷àå ñ ïîñëåäíèì ýëåìåíòîì? (Íåò. Åãî çíà÷åíèå áóäåò óòåðÿíî.)
6) Ìîæíî ëè ýòîãî èçáåæàòü, çàâåäÿ äîïîëíèòåëüíóþ ïåðåìåííóþ? (Äà.  äîïîëíèòåëüíóþ ïåðåìåííóþ ìîæíî ïîìåñòèòü çíà÷åíèå ïîñëåäíåãî ýëåìåíòà. Çàòåì
ïåðåìåñòèòü ýëåìåíòû ñ äåâÿòîãî äî ïåðâîãî âïðàâî. Äàëåå íà ïåðâîå ìåñòî ïîìåñòèòü çíà÷åíèå äåñÿòîãî ýëåìåíòà èç äîïîëíèòåëüíîé ïåðåìåííîé.)
t:=A[10];
for i:=10 downto 2 do
A[i]:=A[i
1];
A[1]:=t;

5. Ýñòåòè÷åñêàÿ ïàóçà
Äåìîíñòðèðóåòñÿ ñëàéä-øîó ñ âèäàìè îçåð ïîä çâóêè âîäû.

6. Çàêðåïëåíèå èçó÷åííîãî ìàòåðèàëà
Çàäà÷à 1.
 îäíîìåðíîì ìàññèâå óäàëèòü ìàêñèìàëüíûé ýëåìåíò.
Ðåøåíèå.
program zadacha1;
const n=10;
var
A: array[1..n] of integer;
max, i, k: integer;
begin
randomize;
for i:=1 to n do
A[i]:=
20+random(60);
for i:=1 to n do
write(A[i]:4);
writeln;
max:=A[1];
for i:=1 to n do
if A[i]>=max then
begin
max:=A[i];
k:=i;
end;
for i:=k to 9 do
A[i]:=A[i+1];
for i:=1 to n
1 do
write(A[i]:4);
writeln;
end.

Çàäà÷à 2.
 îäíîìåðíîì ìàññèâå âñòàâèòü ïîñëå ìèíèìàëüíîãî ýëåìåíòà ÷èñëî 10.
Ðåøåíèå.
program zadacha2;
const n=10;
var
A: array[1..n+1] of integer;
min, i, k: integer;

www.infojournal.ru

26

begin
randomize;
for i:=1 to n do
A[i]:=
20+random(60);
for i:=1 to n do
write(A[i]:4);
writeln;
min:=A[1];
for i:=1 to n do
if A[i] --">