Question

Составьте программу нахождения наибольшего значения роста у двух членов школьной баскетбольной команды (рост спортсменов вводится с клавиатуры).

Answer 1

Uses
  Crt;
Var
  i, N, kol: byte;
  sum_rost, sr_rost: real;
  team: array[1..100] of real;
Begin
  sum_rost := 0.0;
  sr_rost := 0.0;
  kol := 0;
  write('Введите количество членов команды');
  read(N);
  writeln('Введите рост каждого члена команды');
  for i := 1 to N do
    begin
      readln(team[i]);
      sum_rost := sum_rost + team[i];
    end;
  sr_rost := sum_rost / N;
  for i := 1 to N do
    if (team[i] > sr_rost) then
      kol := kol + 1;
  writeln('Количество членов команды, рост которых превышает средний по команде (', sr_rost:4:2, ')');
  write(' равно ', kol);
End.

Прошу. Я надеюсь надо было на паскале написать?)

 

Answer 2

Для нахождения наибольшего значения роста двух членов школьной баскетбольной команды, вы можете воспользоваться следующей программой на языке Python:

pythonCopy code
# Ввод роста первого игрока
рост_игрока1 = float(input("Введите рост первого игрока (в см): "))

# Ввод роста второго игрока
рост_игрока2 = float(input("Введите рост второго игрока (в см): "))

# Нахождение наибольшего роста
наибольший_рост = max(рост_игрока1, рост_игрока2)

# Вывод результата
print("Наибольший рост среди игроков: {} см".format(наибольший_рост))

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