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

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

Если наи­боль­ший балл на­бра­ло боль­ше двух че­ло­век  — вы­ве­сти ко­ли­че­ство таких уче­ни­ков.

Если наи­боль­ший балл на­брал один че­ло­век, а сле­ду­ю­щий балл на­бра­ло не­сколь­ко че­ло­век  — нужно вы­ве­сти толь­ко фа­ми­лию и имя луч­ше­го.

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

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

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

 

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

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

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

Круг­лов Ва­си­лий Та­ра­со­ва Дарья

Дру­гой ва­ри­ант вы­ход­ных дан­ных:

7

Тре­тий ва­ри­ант вы­ход­ных дан­ных:

Гу­сар­ский Илья

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

Ре­ше­ние.

Ответ:

 

ПАС­КАЛЬ

var S,Smax,Smax2:string[52];

ch:char;

i, N, sh,ball, max, nmax, max2, nmax2 : integer;

begin

max:=-1; Smax:=''; nmax:=0;

max2:=-1;

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

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

begin s : = " ; repeat

read(ch);

s:=s+ch

until ch=' ';{счи­та­на фа­ми­лия и за­пом­не­на в пе­ре­мен­ной s}

repeat

read(ch);

s : = s+ch

until ch=' ' ; {счи­та­но имя и до­бав­ле­нак пе­ре­мен­ной s}

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

if sh=50 then {об­ра­ба­ты­ва­ем толь­ко уче­ни­ков 50-й школы}

if ball>max then {те­ку­щий балл - луч­ший}

begin

max2:=max; Smax2:=Smax; nmax2:=nmax;

max : =bal 1; Smax : = s; nmax : = 1

end

else

if ball=max then {те­ку­щий балл - такой же, как луч­ший}

begin

nmax:=nmax+1; max2:=max; Smax2:=S end

else

if ball>max2 then {те­ку­щий балл - лучше вто­ро­го}

begin

max2:=ball; Smax2:=S; nmax2:=1

end

else

if ba1l=max2 then {те­ку­щий балл такой же, как вто­рой}

nmax2 : =nmax2 + l

end;

if (nmax=2) or (nmax= 1) and (nmax2 = 1) then {два луч­ших уче­ни­ка}

begin

writeln (Smax) ;

writeln(Smax2)

end

else

if (nmax=l) and (nmax2>l) then {один луч­ший уче­ник}

writeln(Smax)

else

writeln(nmax) {луч­ших уче­ни­ков боль­ше двух}

end.

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

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

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

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


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