![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#3
|
|||
|
|||
![]() Цитата:
Добавил в код результат, не помогло Код:
function max1 (j:integer; p:real; w:array of real) : real; begin p:=-999999; for j:=1 to 3 do begin if w[j]>p then p:=w[j]; end; result:=p; end; Есть ещё варианты? Проблема решена путём передачи параметров по ссылке Последний раз редактировалось M.A.D.M.A.N., 15.12.2013 в 22:48. |