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

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

В ка­че­стве ре­зуль­та­та про­грам­ма долж­на вы­ве­сти из­ме­нен­ный мас­сив, по од­но­му эле­мен­ту в каж­дой стро­ке.

 

Бей­сикPython

CONST N=30

DIM A(N) AS INTEGER

DIM I, J, K AS INTEGER

FOR I = 1 TO N

    INPUT A(I)

NEXT I

END

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

#ис­поль­зо­ва­ние #це­ло­чис­лен­ных

# пе­ре­мен­ных m, k

a = []

N = 30

for i in range(0, N):

    a.append(int(input()))

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

const

    N=30;

var

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

    i, j, k: integer;

begin

    for i:=1 to N do

        readln(a[i]);

    …

end.

алг

нач

    цел N=30

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

    цел i, j, k

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

        ввод a[i]

    кц

    …

кон

Си++

#include <iostream>

using namespace std;

const int N = 30;

int main(){

    int a[N];

    int i, j, k;

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

        cin >> a[i];

    …

    return 0;

}

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

Ре­ше­ние.

Пас­каль

k := 0;

for i := 1 to N do

    if (a[i] > 150) and (a[i] mod 2 = 0) then

            k:=k+a[i];

for i := 1 to N do begin

    if (a[i] > 150) and (a[i] mod 2 = 0) then

        a[i] := k;

end;

writeln(k);

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

k := 0

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

    если a[i] > 150 и mod(a[i], 2) = 0 то

        k := k + a[i]

    все

кц

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

    если a[i] > 150 и mod(a[i], 2) = 0 то

        a[i] := k

    все

кц

вывод k, нс

Бей­сик

K = 0

FOR I = 1 TO N

    IF A(I) > 150 AND A(I) MOD 2 = 0 THEN

        K = K + A(I)

    END IF

NEXT I

FOR I = 1 TO N

    IF A(I) > 150 AND A(I) MOD 2 = 0 THEN

        A(I) = K

    END IF

NEXT I

PRINT K

Python

k = 0

for i in range(0, n):

    if (a[i] > 150 and a[i] % 2 == 0):

        k+=a[i]

for i in range(0, n):

    if (a[i] > 150 and a[i] % 2 == 0):

        a[i] = k

print(k)

Си

k = 0;

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

if (a[i] > 150 && a[i]%2 == 0)

    k+=a[i];

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

    if (a[i] > 150 && a[i]%2 == 0)

        a[i] = k;

}

cout << k;

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

Кри­те­рии оце­ни­ва­ния вы­пол­не­ния за­да­нияБаллы
Пред­ло­жен пра­виль­ный ал­го­ритм, вы­да­ю­щий в ка­че­стве ре­зуль­та­та вер­ное зна­че­ние2
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 2 балла.

Пред­ло­же­но в целом вер­ное ре­ше­ние, со­дер­жа­щее не более одной ошиб­ки из числа сле­ду­ю­щих:

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

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

3) счётчик ко­ли­че­ства пар в цикле не из­ме­ня­ет­ся или из­ме­ня­ет­ся не­вер­но;

4) не­вер­но про­ве­ря­ет­ся де­ли­мость на 3;

5) на де­ли­мость про­ве­ря­ют­ся не сами эле­мен­ты, а их ин­дек­сы;

6) при про­вер­ке вы­пол­не­ния усло­вия для пары эле­мен­тов ис­поль­зу­ют­ся не­вер­ные ин­дек­сы;

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

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

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

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

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

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

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