1 / 1 / 0
Регистрация: 28.02.2012
Сообщений: 26
1

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

12.06.2012, 11:53. Показов 1549. Ответов 1
Метки нет (Все метки)

На олимпиаде по информатике на школьников заполнялась анкета, содержащая следующую информацию: фамилия, номер школы, класс, набранный балл. Напечатайте:
1. учащиеся каких классов в данной школе набрали меньше всех баллов;
2. информацию об ученике набравшим баллов меньше всех
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.06.2012, 11:53
Ответы с готовыми решениями:

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

Определить, есть ли в школе в каких-либо параллельных классах однофамильцы
Помогите продолжить, хотя бы подсказку дать:sorry: Даны сведения о школьниках: фамилия, имя,...

Определите и выведите на экран номера тех участников, которые набрали не менее 70 баллов
В соревновании принимают участие 30 спортсменов. Номера и результаты спортсменов хранятся в двух...

За один просмотр файла вывести за алфавитом абитуриентов, которые набрали наименьшее количество баллов
Собственно само задание: Создать файл записей с полями:Фамилия абитуриента, оценки за вступительные...

1
Лучи добра
173 / 171 / 191
Регистрация: 08.06.2012
Сообщений: 292
12.06.2012, 14:19 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Вот как-то так сделал. Без учета одинаковых баллов. И без вывода списка учеников - на вводе и так все видно.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
program z;
type
    olymp=record;
    f:string;
    n,c:integer;
    b:real;
end;
var i,n,k,j,sc:integer; s,sa,min:real;
a:array [1..20] of olymp;
begin
     writeln('Введите кол-во учеников');
     readln(n);
     writeln('Ввод информации по ученикам');
     for i:=1 to n do
         with a[i] do
              begin
                   writeln(i,' ученик');
                   write('Фамилия: ');
                   readln(f);
                   write('Школа: ');
                   readln(n);
                   write('Класс: ');
                   readln(c);
                   write('Результат: ');
                   readln(b);
              end;
     s:=0; k:=0;
     writeln;
     writeln('Введите номер школы');
     readln(sc);
     writeln;
     for i:=1 to n do
         with a[i] do
              begin
                   if n=sc
                      then
                          begin
                               s:=s+b;
                               k:=k+1;
                          end;
              end;
     sa:=s/k;
     writeln('Ученики школы №',n,', набравшие наименьшее кол-во баллов среди своих:');
     for i:=1 to n do
         with a[i] do
              if n=sc
                 then
                     begin
                          if b<sa
                             then
                                 writeln(f,'. Класс: ',c,'. Результат: ',b);
                     end;
     with a[1] do
          min:=b;
     for i:=1 to n do
         with a[i] do
              begin
                   if b<min
                      then
                          begin
                               min:=b;
                               j:=i;
                          end;
              end;
     with a[j] do
          writeln('Участник олимпиады, набравший минимум баллов среди всех остальных -  ',f,'. Номер школы: ',n,'. Класс: ',c,'. Результат: ',b);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.06.2012, 14:19
Помогаю со студенческими работами здесь

Структуры данных. Написать программу, позволяющую определить, есть ли в школе в каких-либо классах однофамильцы
Написать программу, позволяющую определить, есть ли в школе в каких-либо классах однофамильцы....

Известно, что никакие два участника не набрали одинаковое количество баллов. По информации о результатах первого тура по
Одна Очень Престижная Олимпиада, как и все престижные олимпиады в последнее время, состоит из двух...

Вывести на экран всех учащихся, чья оценка меньше 3 баллов и посчитать средний балл по классу
В текстовый файл построчно записаны фамилия и имя учащихся класса и его оценка за контрольную....

Вывести номера трех участников (номера строк двумерного массива), которые набрали наименьшее количество баллов
Задание 17. В текстовом файле создать матрицу размером 10x5, в которой находится информация о...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru