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

 Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от 0 до 1000. Опи­ши­те на языке про­грам­ми­ро­ва­ния или есте­ствен­ном языке, ал­го­ритм поз­во­ля­ю­щий найти и вы­ве­сти сумму эле­мен­тов мас­си­ва, не крат­ных пят­на­дца­ти. Га­ран­ти­ру­ет­ся, что в ис­ход­ном мас­си­ве есть хотя бы один эле­мент, зна­че­ние ко­то­ро­го не де­лит­ся на пят­на­дцать. Ис­ход­ные дан­ные объ­яв­ле­ны так как по­ка­за­но ниже. За­пре­ща­ет­ся ис­поль­зо­вать пе­ре­мен­ные, не опи­сан­ные ниже, но раз­ре­ша­ет­ся не ис­поль­зо­вать часть из них.

Бэй­сикПас­каль

N=30

DIM A(N) AS INTEGER

DIM I, J, S AS INTEGER

FOR I = 1 TO N

INPUT A(I)

NEXT I

...

END

const

N=30;

var

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

i, j, s: integer;

begin

for i:=l to N do

readln(a[i]);

...

end.

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

#include <iostream>

using namespace std;

#define N 30

int main(){

int a[N];

int i, j, s;

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

cin >> a[i];

...

алг

нач

цел N=30

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

цел i, j, s

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

ввод а[i]

кц

...

кон

Python

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

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

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

a = []

n = 30

for i in range(0, n):

a.append(int(input()))

...

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

Ре­ше­ние.

ПАС­КАЛЬБЕЙ­СИК
s:=0;

for i:=1 to N do

if (a[i] mod 15<>0) then

s:=s+a[i];

writeln(s);

S = 0

FOR I=1 TO N

IF A(I) MOD 15<>0 THEN

S=S+A(I)

NEXT

PRINT S

СИЕсте­ствен­ный язык
s=0

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

if (a[i]%15!=0)

s+=a[i];

cout << s;

За­пи­сы­ва­ем в пе­ре­мен­ную S на­чаль­ное зна­че­ние, рав­ное 0. В цикле от пер­во­го

эле­мен­та до трид­ца­то­го на­хо­дим оста­ток от де­ле­ния эле­мен­та ис­ход­но­го мас­си­ва

на пят­на­дцать. Если оста­ток от де­ле­ния на пят­на­дцать не равен нулю, то счи­та­ем

сумму те­ку­ще­го эле­мен­та мас­си­ва и зна­че­ния пе­ре­мен­ной S. Ре­зуль­тат сло­же­ния

со­хра­ня­ем в пе­ре­мен­ную S. Пе­ре­хо­дим к сле­ду­ю­ще­му эле­мен­ту мас­си­ва. После

за­вер­ше­ния цикла вы­во­дим зна­че­ние пе­ре­мен­ной S.

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

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

1) не ини­ци­а­ли­зи­ру­ет­ся или не­вер­но ини­ци­а­ли­зи­ру­ет­ся пе­ре­мен­ная;

2) при вы­во­де от­ве­та не учи­ты­ва­ет­ся, что тре­бу­е­мо­го числа в мас­си­ве может не быть;

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

4) в срав­не­нии пе­ре­пу­тан знак;

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

6) на де­ли­мость про­ве­ря­ет­ся не зна­че­ние эле­мен­та, а его ин­декс;

7) в слож­ном усло­вии вме­сто ло­ги­че­ской опе­ра­ции «И» ис­поль­зу­ет­ся ло­ги­че­ская опе­ра­ция «ИЛИ»;

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

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

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

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

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