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

Дан це­ло­чис­лен­ный мас­сив из 25 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 30 до 50  — ко­ли­че­ство яблок в одном ящике. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый среди ящи­ков с ко­ли­че­ством яблок боль­ше со­ро­ка на­хо­дит номер ящика с са­мы­ми круп­ны­ми яб­ло­ка­ми. Га­ран­ти­ру­ет­ся, что такой ящик один. (Вес яблок во всех ящи­ках оди­на­ко­вый.)

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

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

CONST N 25 DIM А(1 ТО N) , I, J,MIN AS INTEGER

FOR I = 1 TO N

INPUT A(I) NEXT I

END

const N = 25;

var A:array[1..N] of integer; i,j,min:integer;

begin

for i:=1 to N do readln (A[i]);

end.

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

#define N 25

int A[25];

int i, j, min;

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

{cin >> a[i];}

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

Объ­яв­ля­ем це­ло­чис­лен­ные пе­ре­мен­ные г, j, min.

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

Python

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

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

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

a = []

n = 25

for i in range(0, n):

a.append(int(input()))

...

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

Ре­ше­ние.

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

За­пи­сы­ва­ем в пе­ре­мен­ную j на­чаль­ное зна­че­ние, рав­ное 1, в пе­ре­мен­ную min  — на­чаль­ное зна­че­ние 50. В цикле от пер­во­го до два­дцать пя­то­го эле­мен­та про­хо­дим весь мас­сив и срав­ни­ва­ем каж­дый эле­мент с 40. Если эле­мент боль­ше 40 и мень­ше зна­че­ния пе­ре­мен­ной min, то при­сва­и­ва­ем пе­ре­мен­ной j номер те­ку­ще­го эле­мен­та, а и пе­ре­мен­ной min при­сва­и­ва­ем зна­че­ние те­ку­ще­го эле­мен­та. Вы­во­дим на экран зна­че­ние пе­ре­мен­ной j.

 

 

Ре­ше­ние на Си

#define N 25

int A[N];

int i, j, min;

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

scanf(%d, A[i]);

min = 51;

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

{

if (A[i] > 40 && A[i] < min) {min = A[i]; j = i+1; }

}

cout « j « endl;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Ошиб­ка в стро­ке

for i:=l to N do readln (A[i]);

Вме­сто еди­ни­цы на­пи­са­на ма­лень­кая буква L