Задания
Версия для печати и копирования в MS Word
Тип 16 № 37833
i

На­пи­ши­те про­грам­му, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет ми­ни­маль­ное число, крат­ное 3. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в по­сле­до­ва­тель­но­сти, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, крат­ное 3. Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Вве­ден­ные числа не пре­вы­ша­ют 30 000. Про­грам­ма долж­на вы­ве­сти одно число  — ми­ни­маль­ное число, крат­ное 3.

 

При­мер ра­бо­ты про­грам­мы:

 

Вход­ные дан­ныеВы­ход­ные дан­ные
3
21
12
31
12
Спрятать решение

Ре­ше­ние.

var n, k, g, h: integer;

begin

h:= 30000;

readln(n);

for k:=1 to n do

begin

readln(g);

if (g mod 3 = 0) and (g < h) then

h:=g;

end;

writeln(h);

end.

 

При­ве­дем ре­ше­ние Павла Шост­ка на языке Pascal.

readarrinteger(readinteger).where(x->x.divs(3)).min.Print;

 

При­ве­дем ре­ше­ние на языке Python.

n = int(input())

mini = 30000

for i in range(n):

a = int(input())

if a % 3 == 0 and mini > a:

mini = a

print(mini)

 

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

 

Вход­ные дан­ныеВы­ход­ные дан­ные
1

3

2

3

20

3
2

3

21

12

36

12
3

3

33

3

63

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

Кри­те­рии оце­ни­ва­ния вы­пол­не­ния за­да­нияБаллы
Пред­ло­же­но вер­ное ре­ше­ние. Про­грам­ма пра­виль­но ра­бо­та­ет на всех при­ведённых выше те­стах. Про­грам­ма может быть за­пи­са­на на любом языке про­грам­ми­ро­ва­ния2
Про­грам­ма выдаёт не­вер­ный ответ на одном из те­стов, при­ведённых выше1
Про­грам­ма выдаёт на те­стах не­вер­ные от­ве­ты, от­лич­ные от опи­сан­ных в кри­те­рии на 1 балл0
Мак­си­маль­ный балл2
Раздел кодификатора ФИПИ: