![]() |
Здравствуйте, гость ( Вход | Регистрация )
![]() |
![]()
Сообщение
#1
|
|
![]() Супер постер ![]() ![]() ![]() ![]() ![]() Группа: Posters Сообщений: 756 Регистрация: 23.9.2006 Из: Саратов Пользователь №: 2,028 ![]() |
помогите решить задачку!
Определить минимальный элемент массива и его порядковый номер. -------------------- спасем китов, maza f*cka! %)
|
|
|
![]() |
Гость_unit47_* |
![]()
Сообщение
#2
|
Guests ![]() |
за это бы у нас прогу не приняли, сказав что не эффективно используете ресурсы ![]() имеешь ввиду лучше было бы сделать I,X:^integer; ??? а с массивом сделать такую штукку раз речь пошла об этом! TYPE MASSIV:ARRAY[1..N] OF INTEGER(или BYTE ![]() PMASSIV=^MASSIV; VAR A:Pmassiv; I:BYTE; а патом всеместо if (I mod 2)<>0 then A[I]:=A[I]*A[I]; if (I mod 2)<>0 then A^[I]:=A^[I]*A^[I]; а патом где надо дописатьNEW(A) и DISPOSE(A); или еще попробовать фишку с SIZEOF так Экономичней??? |
|
|
![]()
Сообщение
#3
|
|
![]() Супер постер ![]() Группа: Global moder Сообщений: 718 Регистрация: 29.8.2005 Из: Чебоксары Пользователь №: 54 ![]() |
имеешь ввиду лучше было бы сделать I,X:^integer; ??? а с массивом сделать такую штукку раз речь пошла об этом! нет, I X никогда не будут отрицательными ![]() хотя я немножко не правильно сказал про ресурсы, жраться то они будут одинково, просто максимальный массивы будет разным ![]() |
|
|
![]() ![]() |
![]() |
Текстовая версия | Сейчас: 16th June 2025 - 08:27 |