Задания
Версия для печати и копирования в MS Word
Тип Д25 C2 № 11321
i

Дан мас­сив из 2000 эле­мен­тов. Хо­ро­шей парой на­зы­ва­ет­ся пара эле­мен­тов, из ко­то­рых оба окан­чи­ва­ют­ся на 9, при этом эле­мен­ты яв­ля­ют­ся со­се­дя­ми. По­счи­тай­те ко­ли­че­ство хо­ро­ших пар. Каж­дый эле­мент по мо­ду­лю не пре­вы­ша­ет 30 000. В от­ве­те ука­жи­те кусок про­грам­мы на месте мно­го­то­чия. Раз­ре­ше­но не ис­поль­зо­вать не­ко­то­рые из ини­ци­а­ли­зи­ро­ван­ных пе­ре­мен­ных, но за­пре­ще­но поль­зо­вать­ся пе­ре­мен­ны­ми, не ука­зан­ны­ми ниже.

 

Бей­сикPython

CONST N = 2000

DIM A (1 TO N) AS INTEGER

DIM I, J, K AS INTEGER

FOR I = 1 TO N

INPUT A(I)

NEXT I

END

// до­пус­ка­ет­ся также ис­поль­зо­вать

// две це­ло­чис­лен­ные пе­ре­мен­ные

// j и k

a = []

n = 2000

for i in range(0, n):

a.append(int(input()))

Пас­кальАл­го­рит­ми­че­ский язык

const

N = 2000;

var

a: array [1..N] of

integer;

i, j, k: integer;

begin

for i := 1 to N do

readln(a[i]);

end.

алг

нач

цел N = 2000

цел­таб a[1:N]

цел i, j, k

нц для i от 1 до N

ввод a[i]

кц

кон

Си++

#include

#define N 2000

int main() {

int a[N];

int i, j, k;

for (i = 0; i < N; i++)

cin >> a[i];

return 0;

}

Спрятать решение

Ре­ше­ние.

Ис­поль­зу­ет­ся PascalABC.NET

j:=0;

for i:=2 to N do

  if (abs(a[i-1]) mod 10=9) and (abs(a[i]) mod 10=9) then j:=j+1;

writeln (j);

Спрятать критерии
Критерии проверки:

Кри­те­рии оце­ни­ва­ния вы­пол­не­ния за­да­нияБаллы
Пред­ло­жен пра­виль­ный ал­го­ритм, вы­да­ю­щий вер­ное зна­че­ние. До­пус­ка­ет­ся за­пись ал­го­рит­ма на дру­гом языке, ис­поль­зу­ю­щая ана­ло­гич­ные пе­ре­мен­ные. В слу­чае, если язык про­грам­ми­ро­ва­ния ис­поль­зу­ет ти­пи­зи­ро­ван­ные пе­ре­мен­ные, опи­са­ния пе­ре­мен­ных долж­ны быть ана­ло­гич­ны опи­са­ни­ям пе­ре­мен­ных на есте­ствен­ном языке. Ис­поль­зо­ва­ние не­ти­пи­зи­ро­ван­ных или не­объ­яв­лен­ных пе­ре­мен­ных воз­мож­но толь­ко в слу­чае, если это до­пус­ка­ет­ся язы­ком про­грам­ми­ро­ва­ния, при этом ко­ли­че­ство пе­ре­мен­ных и их иден­ти­фи­ка­то­ры долж­ны со­от­вет­ство­вать усло­вию за­да­чи. В ал­го­рит­ме, за­пи­сан­ном на языке про­грам­ми­ро­ва­ния, до­пус­ка­ет­ся на­ли­чие от­дель­ных син­так­си­че­ских оши­бок, не ис­ка­жа­ю­щих за­мыс­ла ав­то­ра про­грам­мы.2
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 2 балла. При этом пред­ло­же­но в целом вер­ное ре­ше­ние, со­дер­жа­щее не более одной ошиб­ки из числа сле­ду­ю­щих:

1) От­сут­ствие ини­ци­а­ли­за­ции или не­вер­ная ини­ци­а­ли­за­ция ми­ни­му­ма.

2) Выход за гра­ни­цы мас­си­ва.

3) Вы­чис­ле­ние про­из­ве­де­ния всех эле­мен­тов мас­си­ва без учёта воз­мож­но­сти пе­ре­пол­не­ния.

4) Не­вер­ные срав­не­ния при опре­де­ле­нии ми­ни­му­ма(на­при­мер, вме­сто ми­ни­му­ма ищет­ся мак­си­мум).

5) Ошиб­ка при опре­де­ле­нии чётно­сти эле­мен­та.

6) Про­вер­ка на чётность ин­дек­са вме­сто зна­че­ния эле­мен­та.

7) Ошиб­ка при вы­бо­ре зна­че­ния для вы­во­да (вывод чётного зна­че­ния вме­сто нечётного или на­о­бо­рот).

8) Ошиб­ка при по­стро­е­нии ло­ги­че­ско­го вы­ра­же­ния.

9) От­сут­ству­ет вывод от­ве­та.

10) Ис­поль­зу­ет­ся пе­ре­мен­ная, не объ­яв­лен­ная в раз­де­ле опи­са­ния пе­ре­мен­ных.

11) Ин­декс­ная пе­ре­мен­ная в цикле не ме­ня­ет­ся (на­при­мер, в цикле while) или ме­ня­ет­ся не­вер­но.

До­пус­ка­ет­ся на­ли­чие от­дель­ных син­так­си­че­ских оши­бок, не ис­ка­жа­ю­щих за­мыс­ла ав­то­ра про­грам­мы.

1
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 1 или 2 балла.0
Мак­си­маль­ный балл2
Источник: ЕГЭ 16.06.2016 по ин­фор­ма­ти­ке. Ос­нов­ная волна. Ва­ри­ант 41 (Часть 2)