Определить, учащиеся каких классов в школе набрали меньше всех баллов

@xXxFEHUKCxXx · Регистрация: 30.11.2011

На олимпиаде по информатике на школьников заполнялась анкета, содержащая следующую информацию: фамилия, номер школы, класс, набранный балл. Напечатайте:
1. списки школ, занявших призовые места;
2. какая из школ заняла больше всех призовых мест;
3. списки учеников, занявших первое место, и указать их класс.
4. какие из школ не заняли призовых мест;
5. учащиеся каких классов в данной школе набрали меньше всех баллов;
6. информацию об ученике набравшим баллов меньше всех

помогите плз

@xXxFEHUKCxXx · 08.12.2011, 20:34 **[ТС]**

Pascal

type
  TAnketa=record
      Fam: string(50);
      NumS: integer;
      Klass: integer;
      Ball: integer;
   end;
 
var
  i: integer;
  A: array[1..25] of TAnketa; {Анкеты}
begin
  {вводим данные во все поля для 25 записей}
  for i:=1 to 25 do
  begin
     {перебираем записи и считаем призовые места}
  end;
end.

помогите плз с процедурами

@xXxFEHUKCxXx · 11.12.2011, 15:50 **[ТС]**

помогите плз

@xXxFEHUKCxXx 6 / 6 / 2 Регистрация: 30.11.2011 Сообщений: 14
		1
	Определить, учащиеся каких классов в школе набрали меньше всех баллов 01.12.2011, 09:32. Показов 1240. Ответов 2 Метки нет (Все метки) На олимпиаде по информатике на школьников заполнялась анкета, содержащая следующую информацию: фамилия, номер школы, класс, набранный балл. Напечатайте: 1. списки школ, занявших призовые места; 2. какая из школ заняла больше всех призовых мест; 3. списки учеников, занявших первое место, и указать их класс. 4. какие из школ не заняли призовых мест; 5. учащиеся каких классов в данной школе набрали меньше всех баллов; 6. информацию об ученике набравшим баллов меньше всех помогите плз __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

@xXxFEHUKCxXx 6 / 6 / 2 Регистрация: 30.11.2011 Сообщений: 14
	11.12.2011, 15:50 [ТС]	3
	помогите плз 0

Опции темы

Определить, учащиеся каких классов в школе набрали меньше всех баллов

Решение