✎ Задать свой вопрос   *более 30 000 пользователей получили ответ на «Решим всё»

Задача 893 На вход программе подаются сведения о

УСЛОВИЕ:

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

<Фамилия> <Инициалы> <номер школы>

где <Фамилия> – строка, состоящая не более чем из 20 символов, <Инициалы> – строка, состоящая из 4-х символов (буква, точка, буква, точка), <номер школы> – не более чем двузначный номер. <Фамилия> и <Инициалы>, а также <Инициалы> и <номер школы> разделены одним пробелом. Пример входной строки:

Иванов П.С. 57

Требуется написать как можно более эффективную программу (укажите используемую версию языка программирования, например, Borland Pascal 7.0), которая будет выводить на экран информацию, из какой школы было меньше всего участников (таких школ может быть несколько). При этом необходимо вывести информацию только по школам, пославшим хотя бы одного участника. Следует учитывать, что N>=1000.

РЕШЕНИЕ:

const LIM = 99;
var C:array[1..LIM] of integer;
i, p, N, k, r, Min: integer;
s:string;
begin
for k:=1 to 99 do C[k]:=0;
readln(N);
for i:=1 to N do begin
readln(s); { читаем очередную строку }
{ выделяем часть после второго пробела }
p := Pos(' ', s);
Delete(s, 1, p+5);
{ определяем номер школы k }
Val(s, k, r);
C[k] := C[k] + 1; { увеличиваем счетчик k-ой школы }
end;
Min := N;
for k:=1 to LIM do
if (C[k] <> 0) and (C[k]<Min) then Min := C[k];
for k:=1 to LIM do
if C[k] = Min then writeln(k);
end.

Вопрос к решению?
Нашли ошибку?

ОТВЕТ:

в решение

Добавил slava191, просмотры: ☺ 3959 ⌚ 10.04.2014. информатика 10-11 класс

Решения пользователей

Увы, но свой вариант решения никто не написал... Будь первым!
Хочешь предложить свое решение? Войди и сделай это!

Написать комментарий

Последние решения
1.- Здравствуйте,я хочу предложить Вам новую услугу нашего ресторана.
- Здравствуйте, нет спасибо.
2.-Здравствуйте,мы предлагаем Вам абсолютно новую услугу нашего ресторана."Онлайн меню".
-Здравствуйте,извините,но меня не интересует данная услуга.
✎ к задаче 44308
2
✎ к задаче 44349
Ch3-nh-c2h5 + o2 = co2+h2o+ n2
Ch3-nh-c2h5 + ch3cooh = CH3COO^(-)nh2^(+)(Ch3)(c2h5)

Любая органика горит в кислороде .
Амины проявляют основные свойства ( по аминогруппе , сходно с аммиаком), поэтому взаимодействуют с кислотами
Ответ - 13
✎ к задаче 44202
А) CH3COOH + Na = CH3COONa (Ацетат)+ h2
Б) C2H5OH + Na = C2H5ONa (Этилат)+ H2
B) HCOOH + Na = HCOONa (формиат)+ H2
Г) 2C2H5Cl + 2Na = C4H10 + 2NaCl
Ответ - 6153
✎ к задаче 44204
(прикреплено изображение)
✎ к задаче 44349