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

Дан це­ло­чис­лен­ный мас­сив из 20 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от –10 000 до 10 000 вклю­чи­тель­но. Опи­ши­те

на есте­ствен­ном языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, поз­во­ля­ю­щий найти и вы­ве­сти ко­ли­че­ство пар эле­мен­тов мас­си­ва, в ко­то­рых хотя бы одно число де­лит­ся на 13. В дан­ной за­да­че под парой под­ра­зу­ме­ва­ет­ся два под­ряд иду­щих эле­мен­та мас­си­ва. На­при­мер, для мас­си­ва из пяти эле­мен­тов: 6; 2; 13; –26; 14  — ответ: 3.

Ис­ход­ные дан­ные объ­яв­ле­ны так, как по­ка­за­но ниже на при­ме­рах для не­ко­то­рых язы­ков про­грам­ми­ро­ва­ния и есте­ствен­но­го языка. За­пре­ща­ет­ся ис­поль­зо­вать пе­ре­мен­ные, не опи­сан­ные ниже, но раз­ре­ша­ет­ся

не ис­поль­зо­вать не­ко­то­рые из опи­сан­ных пе­ре­мен­ных.

 

 

Бей­сикPython

CONST N AS INTEGER = 20

DIM A (1 TO N) AS INTEGER

DIM I AS INTEGER,

       J AS INTEGER,

       K AS INTEGER

 

FOR I = 1 TO N

INPUT A(I)

NEXT I

...

END

# до­пус­ка­ет­ся также

# ис­поль­зо­вать две

# це­ло­чис­лен­ные пе­ре­мен­ные j и k

a = []

n = 20

for i in range(0, n):

    a.append(int(input()))

...

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

const

    N = 20;

var

    a: array [1..N] of integer;

    i, j, k: integer;

begin

    for i := 1 to N do

        readln(a[i]);

    ...

end.

алг

нач

    цел N = 20

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

    цел i, j, k

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

        ввод a[i]

    кц

    ...

кон

СиЕсте­ствен­ный язык

#include

#define N 20

int main() {

    int a[N];

    int i, j, k;

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

        cin >> a[i];

    ...

    return 0;

}

Объ­яв­ля­ем мас­сив A из 20 эле­мен­тов.

Объ­яв­ля­ем це­ло­чис­лен­ные пе­ре­мен­ные I, J, K.

В цикле от 1 до 20 вво­дим эле­мен­ты мас­си­ва A с 1-го по 20-й.

…

 

В ка­че­стве от­ве­та Вам не­об­хо­ди­мо при­ве­сти фраг­мент про­грам­мы (или опи­са­ние ал­го­рит­ма на есте­ствен­ном языке), ко­то­рый дол­жен на­хо­дить­ся на месте мно­го­то­чия. Вы мо­же­те за­пи­сать ре­ше­ние также на дру­гом языке про­грам­ми­ро­ва­ния (ука­жи­те на­зва­ние и ис­поль­зу­е­мую вер­сию языка про­грам­ми­ро­ва­ния, на­при­мер Free Pascal 2.6) или в виде блок-схемы. В этом слу­чае Вы долж­ны ис­поль­зо­вать те же самые ис­ход­ные дан­ные и пе­ре­мен­ные, какие были пред­ло­же­ны в усло­вии (на­при­мер, в об­раз­це, за­пи­сан­ном на есте­ствен­ном языке).

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

Ре­ше­ние.

Пас­каль

k := 0;

for i := 1 to N-1 do

    if (a[i] mod 13=0) or (a[i+1] mod 13=0) then

        inc(k);

writeln(k);

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

k := 0;

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

    если mod(a[i],13)=0 или mod(a[i+1],13)=0

    то

        k := k+1

    все

кц

вывод k

Бей­сик

K = 0

FOR I = 1 TO N-1

    IF (A(I) MOD 13 = 0) OR (A(I + 1) MOD 13 = 0) THEN

        K = K+1

    END IF

NEXT I

PRINT K

Python

k = 0

for i in range(0, n – 1):

    if (a[i] % 13 == 0 or a[i + 1] % 13 == 0):

        k +=1

print(k)

Си

k = 0;

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

    if (a[i]%13 == 0 || a[i+1]%13 == 0)

        k++;

cout « k « endl;

Есте­ствен­ный язык
За­пи­сы­ва­ем в пе­ре­мен­ную K на­чаль­ное зна­че­ние, рав­ное 0. В цикле от пер­во­го эле­мен­та до пред­по­след­не­го на­хо­дим оста­ток от де­ле­ния те­ку­ще­го и сле­ду­ю­ще­го эле­мен­та мас­си­ва на 13. Если пер­вый или вто­рой из по­лу­чен­ных остат­ков равен 0, уве­ли­чи­ва­ем пе­ре­мен­ную K на еди­ни­цу. После за­вер­ше­ния цикла вы­во­дим зна­че­ние пе­ре­мен­ной K
Спрятать критерии
Критерии проверки:

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

1) в цикле про­ис­хо­дит выход за гра­ни­цу мас­си­ва (на­при­мер, ис­поль­зу­ет­ся цикл от 1 до N);

2) не ини­ци­а­ли­зи­ру­ет­ся или не­вер­но ини­ци­а­ли­зи­ру­ет­ся счётчик ко­ли­че­ства най­ден­ных пар;

3) не­вер­но осу­ществ­ля­ет­ся про­вер­ка суммы пары эле­мен­тов на чётность (в том числе ис­поль­зу­ет­ся вы­ра­же­ние вида a[i]+a[i+1] mod 2<>0 без ско­бок);

4) на чётность про­ве­ря­ет­ся не сумма зна­че­ний эле­мен­тов, а сумма их ин­дек­сов;

5) не­вер­но осу­ществ­ля­ет­ся про­вер­ка суммы пары эле­мен­тов на по­ло­жи­тель­ность;

6) в слож­ном ло­ги­че­ском усло­вии про­стые про­вер­ки верны, но усло­вие в целом по­стро­е­но не­вер­но (на­при­мер, пе­ре­пу­та­ны опе­ра­ции «И» и «ИЛИ», не­вер­но рас­став­ле­ны скоб­ки в ло­ги­че­ском вы­ра­же­нии);

7) от­сут­ству­ет вывод от­ве­та;

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

9) не ука­за­но или не­вер­но ука­за­но усло­вие за­вер­ше­ния цикла;

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

11) не­вер­но рас­став­ле­ны опе­ра­тор­ные скоб­ки.

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

1
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 1 или 2 балла. На­при­мер, оши­бок, пе­ре­чис­лен­ных в п. 1–11, две или боль­ше, или ал­го­ритм сфор­му­ли­ро­ван не­вер­но.0
Мак­си­маль­ный балл2

Аналоги к заданию № 9376: 12441 Все

Источник: За­да­ния для школы экс­пер­тов. Ин­фор­ма­ти­ка. 2016 год
Спрятать решение · Прототип задания · КритерииСпрятать критерии · Помощь


О про­ек­те · Ре­дак­ция · Пра­во­вая ин­фор­ма­ция · О ре­кла­ме
© Гущин Д. Д., 2011—2025