Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
2 / 2 / 0
Регистрация: 01.05.2013
Сообщений: 44
1

Вычислить средний рост учеников, рост самого высокого и самого низкого ученика

01.05.2013, 12:39. Просмотров 1827. Ответов 1
Метки нет (Все метки)

Приветствую, форумчане.
Всех с праздником и заслуженными выходными)
Требуется помощь в нескольких вопросах, а именно:

4. В таблице хранятся следующие данные об учениках: фамилия ,имя ,отчество ,рост, масса. Вычислить средний рост учеников ,рост самого высокого и самого низкого ученика. Сколько учеников могут заниматься в баскетбольной секции ,если рост баскетболиста должен быть больше 170 сантиметров (разработать алгоритм).


С меня плюс и вечная благодарность
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.05.2013, 12:39
Ответы с готовыми решениями:

Определить, на сколько рост самого высокого человека превышает рост самого низкого
В массиве хранится информация о росте 25 человек. Определить, на сколько рост самого высокого...

Определить, на сколько рост самого высокого человека превышает рост самого низкого
1) В массиве хранится информация о росте 25 человек. Определить, на сколько рост самого высокого...

Рандомно задать рост 27 учеников от 157 до 190 и посчитать средний рост в классе
программа должна рандомно задать рост 27 учеников от 157 до 190 и посчитать средний рост в классе....

Определить, на сколько рост самого высокого человека превышает рост самого низкого.
112) В массиве хранится информация о результатах 22 спортсменов, участвовавших в соревнованиях по...

1
74 / 74 / 30
Регистрация: 22.03.2013
Сообщений: 224
01.05.2013, 16:06 2
Лучший ответ Сообщение было отмечено k1x как решение

Решение

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
program _ucheniki;
 
const
  n = 4;// число учеников n должен быть больше двух
 
type
  
  ushenik = record // запись типа ученик фам,им,отч,масса,рост
    fam: string;
    imya: string;
    otch: string;
    mass, rost: integer;
  end;
 
var
  ush: array[1..n] of ushenik; //массив учеников
  sr: real := 0;// средний рост
  k: integer := 0;//сколько учеников могут заниматся баскетболом
  max, min: integer;//самый высокий и самый низкий;
 
begin
 
  for var i := 1 to n do //заполнение данныхх
    with ush[i] do
    begin
      writeln('Ведите данные  ', i, '   ученика');
      writeln('Фамиля Имя Отчество через пробел');
      readln(fam, imya, otch);
      writeln('Рост и массу через пробел');
      read(rost, mass);
      readln();
    end;
  max := ush[1].rost;
  min := ush[1].rost;
  for var i := 1 to n do
  begin
    sr := sr + ush[i].rost;
    if ush[i].rost > 170 then inc(k);
  end;
  sr := sr / n;
  writeln('Срединй рост учеников');
  writeln(sr);
  for var i := 2 to n do 
  begin
    if max < ush[i].rost then max := ush[i].rost;
    if min > ush[i].rost then min := ush[i].rost;
  end;
  writeln('Самый большой рост и самый маленький');
  writeln(max, '      ', min);
  writeln(k, '  учеников могут ирать баскетбол');
  
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.05.2013, 16:06

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Найти и вывести рост самого высокого участника баскетбольной команды
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от 150 до 200 -...

Одномерный массив. классе n учеников. Вычислить средний рост кандидатов в сборную.
В ЭВМ вводятся фамилии и рост учеников 8 класса. Для определения кандидатов в баскетбольную команду...

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

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


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.