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

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

 

Завуч школы №30 ре­ши­ла на­гра­дить двух уча­щих­ся,ко­то­рые лучше всех сдали ин­фор­ма­ти­ку.

Про­грам­ма долж­на вы­ве­сти на экран фа­ми­лии и имена этих уче­ни­ков.

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

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

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

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

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

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

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

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

<Ко­ли­че­ство бал­лов>-число в диа­па­зо­не от 1 до 100.

Эти дан­ные за­пи­са­ны через про­бел,то есть в каж­дой стро­ке ровно 3 про­бе­ла.

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

Ре­ше­ние.

var Str,Strmax,Strmax2:string[52];

simvol:char;

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

Begin

max:=-1;

max2:=-1;

Strmax:='';

nmax:=0;

Writeln('Вве­ди­те ко­ли­че­ство уче­ни­ков: ');readln(N);

for i:=1 to N do

begin

str:='';

Repeat         

read(simvol);   

Str:=Str+simvol;

Until simvol=' '; 

Repeat

read(simvol);

Str:=Str+simvol;

Until simvol=' ';

read(nomer);

read(ball);

if nomer=30 then     

   if ball>max then 

      begin

           max2:=max;

           max:=ball; 

           Strmax2:=strmax;

           Strmax:=Str; 

           nmax2:=nmax;

           nmax:=1;

end

else

  if ball=max then 

       begin

         nmax:=nmax+1;

         nmax2:=nmax;

         Strmax2:=Strmax;

end

else if ball>max2 then 

     begin

     max2:=ball;

     Strmax2:=Str;

     nmax2:=1;

end

else   if ball=max2 then nmax2:=nmax2+1;

end;

if (nmax=2) or (nmax=1) and (nmax2=1) then

   begin

    writeln(Strmax);

    writeln(Strmax2);

 end

   else

   if (nmax=1) and (nmax2>1) then writeln(StrMax);

   if nmax>2 then writeln(nmax);

End.

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

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

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

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


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