Информатика, опубликовано 2018-08-22 20:32:30 by Гость

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

Ответ оставил Гость

const n = 25;
var
  a: array[1..n] of integer;
  i, result, num: integer;
begin
  result := 50;
  for i := 1 to n do begin
    a[i] := random(30) + 20;
    write(a[i], );
    if(a[i]       result := a[i];
      num := i;
    end;
  end;
  writeln;
  writeln(Лучший результат у спротсмена под номером [, num, ] его время: , result);
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.