Задания
Версия для печати и копирования в MS Word
Тип Д19 C4 № 3624
i

После еди­ных вы­пуск­ных эк­за­ме­нов по ин­фор­ма­ти­ке в район при­ш­ла ин­фор­ма­ция о том, какой уче­ник какой школы сколь­ко бал­лов на­брал. По по­ло­же­нию об эк­за­ме­не каж¬дый район сам опре­де­ля­ет, за какой балл нужно по­ста­вить какую оцен­ку.

Рай­он­ный ме­то­дист ре­ши­ла, что оцен­ку «от­лич­но» долж­ны по­лу­чить 20% участ­ни­ков (целое число, с от­бра­сы­ва­ни­ем дроб­ной части).

Для этого она долж­на опре­де­лить, какой балл дол­жен был на­брать уче­ник, чтобы по­лу­чить «от­лич­но».

Если не­воз­мож­но опре­де­лить такой балл, чтобы «от­лич­но» по­лу­чи­ли ровно 20% участ­ни­ков, «от­лич­но» долж­но по­лу­чить мень­ше участ­ни­ков, чем 20%.

Если таких участ­ни­ков не ока­жет­ся (наи­боль­ший балл на­бра­ли боль­ше 20% участ­ни­ков)  — эти и толь­ко эти уче­ни­ки долж­ны по­лу­чить «от­лич­но».

На­пи­ши­те эф­фек­тив­ную, в том числе и по ис­поль­зу­е­мой па­мя­ти, про­грам­му (ука­жи­те ис­поль­зу­е­мую вер­сию языка про­грам­ми­ро­ва­ния, на­при­мер Borland Pascal 7.0), ко­то­рая долж­на вы­ве­сти на экран наи­мень­ший балл, ко­то­рый набра¬ли участ­ни­ки, по­лу­чив­шие «от­лич­но». Из­вест­но, что ин­фор­ма­ти­ку сда­ва­ло боль­ше 5-ти уче­ни­ков. Также из­вест­но, что есть такое ко­ли­че­ство бал­лов, ко­то­рое не по­лу­чил ни один участ­ник.

На вход про­грам­ме сна­ча­ла подаётся число уче­ни­ков, сда-вав­ших эк­за­мен. В каж­дой из сле­ду­ю­щих N строк на­хо­дит­ся ин­фор­ма­ция об уче­ни­ках в фор­ма­те:

 

<Фа­ми­лия> <Имя> <Номер школы> <Ко­ли­че­ство бал­лов>

 

где <Фа­ми­лия>  — стро­ка, со­сто­я­щая не более чем из 30 сим­во­лов без про­бе­лов,

<Имя>  — стро­ка, со­сто­я­щая не более чем из 20 сим­во­лов без про­бе­лов,

<Номер школы>  — целое число в диа­па­зо­не от 1 до 99,

<Ко­ли­че­ство бал­лов>  — целое число в диа­па­зо­не от 1 до 100. Эти дан­ные за­пи­са­ны через про­бел, причём ровно один между каж­дой парой (то есть всего по три про­бе­ла в каж­дой стро­ке).

 

При­мер вход­ной стро­ки:

Ива­нов Иван 50 87

При­мер вы­ход­ных дан­ных:

78

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

Ре­ше­ние.

ПАС­КАЛЬ

var k:array[0..100] of integer; (число уче­ни­ков, на­брав­ших такой балл)

ch:char;

i,N,sh,ball,num,s:integer;

begin

for i: =0 to 100 do {об­ну­ля­ем мас­сив}

k[i]:=0;

readln(N); (счи­та­ли ко­ли­че­ство строк}

for i:=1 to N do {пе­ре­би­ра­ем все вход­ные стро­ки}

begin

repeat

read(ch)

until ch=' ';{счи­та­на фа­ми­лия}

repeat

read(ch) until ch=' ';(счи­та­но имя}

readln(sh,ball); {счи­та­ли номер школы и балл уче­ни­ка}

k[ball]:=k[ball]+l {счи­та­ем ко­ли­че­ство уче­ни­ков, на­брав­ших такой балл}

end;

num:=N div 5; {вы­чис­ля­ем 20% от ко­ли­че­ства уче­ни­ков}

S : = 0 ;

i : = 101 ;

whilе s < num do

begin

i:=i-l;

s:=s+k[i]

end;

if s=num then {"от­лич­но" можно по­ста­вить ровно 20% участ­ни­ков}

writeln(i)

else

if k[i]=s then {наи­боль­ший балл на­бра­ло более 20% участ­ни­ков}

writeln(i)

else {уче­ни­ки, на­брав­шие "i" бал­лов, не по­лу­чат "от­лич­но"}

begin

i:=i+l;

while k[i]=0 do {ищем участ­ни­ков с боль­шим бал­лом}

i:=i+l;

writeln(i)

end

end.

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

Кри­те­рии оце­ни­ва­ния вы­пол­не­ния за­да­нияБаллы
Про­грам­ма ра­бо­та­ет для любых вход­ных дан­ных про­из­воль­но­го раз­ме­ра и на­хо­дит ответ, не со­хра­няя вход­ные дан­ные в мас­си­ве, раз­мер ко­то­ро­го со­от­вет­ству­ет числу N (ко­ли­че­ству за­про­сов). Про­грам­ма про­смат­ри­ва­ет вход­ные дан­ные один раз. До­пус­ка­ет­ся на­ли­чие в тек­сте про­грам­мы одной син­так­си­че­ской ошиб­ки: про­пу­щен или не­вер­но ука­зан знак пунк­ту­а­ции, не­вер­но на­пи­са­но или про­пу­ще­но за­ре­зер­ви­ро­ван­ное слово языка про­грам­ми­ро­ва­ния, не опи­са­на или не­вер­но опи­са­на пе­ре­мен­ная, при­ме­ня­ет­ся опе­ра­ция, не­до­пу­сти­мая для со­от­вет­ству­ю­ще­го типа дан­ных (если одна и та же ошиб­ка встре­ча­ет­ся не­сколь­ко раз, то это счи­та­ет­ся за одну ошиб­ку).4
Про­грам­ма ра­бо­та­ет верно, но вход­ные дан­ные за­по­ми­на­ют­ся в мас­си­ве, раз­мер ко­то­ро­го со­от­вет­ству­ет числу N. Этот мас­сив, воз­мож­но, потом сор­ти­ру­ет­ся. До­пус­ка­ет­ся на­ли­чие от одной до трех син­так­си­че­ских оши­бок. Воз­мож­но, в прин­ци­пи­аль­но верно ор­га­ни­зо­ван­ном вводе дан­ных есть одна ошиб­ка (на­при­мер, ис­поль­зо­ва­ние read вме­сто readln в Пас­ка­ле или не­вер­ное счи­ты­ва­ние стро­ки в C++). Три балла также вы­став­ля­ет­ся, если в эф­фек­тив­ной про­грам­ме, удо­вле­тво­ря­ю­щей кри­те­ри­ям вы­став­ле­ния 4 бал­лов, есть одна ошиб­ка, в ре­зуль­та­те ко­то­рой про­грам­ма ра­бо­та­ет не­вер­но на не­ко­то­рых на­бо­рах не­ти­пич­ных вход­ных дан­ных.3
Про­грам­ма ра­бо­та­ет в целом верно, эф­фек­тив­но или нет, но в ре­а­ли­за­ции ал­го­рит­ма со­дер­жит­ся до двух оши­бок (не­вер­ная ини­ци­а­ли­за­ция счётчи­ков, до­пу­ще­на ошиб­ка в прин­ци­пи­аль­но верно ор­га­ни­зо­ван­ной сор­ти­ров­ке или ал­го­рит­ме по­ис­ка ми­ни­маль­ных эле­мен­тов, ис­поль­зу­ет­ся знак “<” вме­сто “<=”, “or” вме­сто “and” и тому по­доб­ное).

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

2
Про­грам­ма, воз­мож­но, не­вер­но ра­бо­та­ет при не­ко­то­рых вход­ных дан­ных, но по при­ведённому тек­сту ре­ше­ния ясно, что эк­за­ме­ну­е­мый по­ни­ма­ет, из каких эта­пов долж­но со­сто­ять ре­ше­ние за­да­чи. При ис­поль­зо­ва­нии сор­ти­ров­ки она может быть ре­а­ли­зо­ва­на прин­ци­пи­аль­но не­вер­но (на­при­мер, вме­сто двух цик­лов ис­поль­зу­ет­ся один), или до­пу­ще­на прин­ци­пи­аль­ная ошиб­ка в по­ис­ке нуж­ных эле­мен­тов. Всего до­пус­ка­ет­ся до 4 раз­лич­ных оши­бок в ре­а­ли­за­ции ал­го­рит­ма, в том числе опи­сан­ных в кри­те­ри­ях при­сво­е­ния двух бал­лов. До­пус­ка­ет­ся на­ли­чие от одной до семи син­так­си­че­ских оши­бок, опи­сан­ных выше.1
За­да­ние не вы­пол­не­но или вы­пол­не­но не­вер­но.0
Мак­си­маль­ный балл4
Спрятать решение · КритерииСпрятать критерии · Помощь


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