Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2006.12.17;
Скачать: [xml.tar.bz2];

Вниз

Помощь по заданию на Паскале.Поможет кто-то?   Найти похожие ветки 

 
TauRus ©   (2006-11-14 15:56) [0]

Преобразовать вектор в соответствии с правилом: i-й элемент вектора равен  (Хi + Хn-i + Хn-i-1)/3 где  i=n-2,1


 
Сергей М. ©   (2006-11-14 16:01) [1]

А ты не опух от наглости ?


 
Jeer ©   (2006-11-14 16:01) [2]

исключительно своим мозгом.
Неужели так трудно найти среднее трех последовательных эелементов массива ?


 
Array ©   (2006-11-14 16:02) [3]

а что.. простота залог здоровья ... не нашего явно (((

а почему не указана цена за помощ?


 
Percent   (2006-11-14 16:06) [4]

Не помогу.


 
Empleado ©   (2006-11-14 16:35) [5]


> Сергей М. ©   (14.11.06 16:01) [1]
> А ты не опух от наглости ?

По крайней мере он не грубит.
Есть уже над чем задуматься, а?


 
_uw_   (2006-11-14 16:45) [6]

Надо помочь, имхо.


 
oldman ©   (2006-11-14 16:51) [7]


> (Хi + Хn-i + Хn-i-1)/3 где  i=n-2,1


И как "i=n-2,1" подставить в "Xi + Xn-i + Xn-i-1"


 
Anatoly Podgoretsky ©   (2006-11-14 16:52) [8]

> _uw_  (14.11.2006 16:45:06)  [6]

Надо, и что дальше?


 
Юрий ©   (2006-11-14 16:52) [9]

Всем срочно включить телепортаторы!


 
_uw_   (2006-11-14 16:54) [10]

Anatoly Podgoretsky ©   (14.11.06 16:52) [8]
Надо, и что дальше?

Пока не грубит.


 
sniknik ©   (2006-11-14 16:55) [11]

_uw_   (14.11.06 16:45) [6]
> Надо помочь, имхо.
инициатива наказуема исполнением... поэтому берись, и вперед с песней!


 
_uw_   (2006-11-14 16:55) [12]

Я не могу, мне лень.


 
Anatoly Podgoretsky ©   (2006-11-14 16:56) [13]

> _uw_  (14.11.2006 16:54:10)  [10]

Пока, а что дальше то, как быть с твоим предложением?


 
_uw_   (2006-11-14 16:58) [14]

Пока лень.


 
Anatoly Podgoretsky ©   (2006-11-14 16:59) [15]

> _uw_  (14.11.2006 16:55:12)  [12]

Так какого же черта, далее куча точек


 
_uw_   (2006-11-14 16:59) [16]

Все, у меня гудок прогудел - поехал домой, уффф.


 
Anatoly Podgoretsky ©   (2006-11-14 17:00) [17]

> _uw_  (14.11.2006 16:58:14)  [14]

Ага уже оправдываться начал.


 
clickmaker ©   (2006-11-14 17:03) [18]


>  [16] _uw_   (14.11.06 16:59)
> Все, у меня гудок прогудел - поехал домой, уффф

Экий ты несознательный. А подтянуть отстающего товарища?


 
Anatoly Podgoretsky ©   (2006-11-14 17:05) [19]

> _uw_  (14.11.2006 16:59:16)  [16]

Слинял, может из дома поможешь?
Кстати и у меня гудок.


 
Virgo_Style ©   (2006-11-14 18:14) [20]

i-й элемент вектора X : X[i] ;
перебор элементов можно выполнить циклом for

что-то еще?


 
Jeer ©   (2006-11-14 18:19) [21]

ага


 
oldman ©   (2006-11-14 18:21) [22]


> Virgo_Style ©   (14.11.06 18:14) [20]
> i-й элемент вектора X : X[i] ;
> перебор элементов можно выполнить циклом for
>
> что-то еще?


Еще неплохобы нормальное задание...
Для X[1] что такое n?


 
Ketmar ©   (2006-11-14 18:34) [23]

отвечаю на вопрос из сабжа: бесплатно -- никто.


 
oldman ©   (2006-11-14 18:38) [24]


> Ketmar ©   (14.11.06 18:34) [23]


Да и платно вряд ли...


 
_uw_   (2006-11-14 20:18) [25]

Я доехал, слава Аллаху! И поужинал уже.

Аффтар, как дела?


 
Ketmar ©   (2006-11-14 20:33) [26]

автор с разгону забодал стену.


 
TauRus ©   (2006-11-15 16:55) [27]

Извините, не заметил...
вот все задание...(если можно, желательно все...)
1. Получить элементы квадратной матрицы  А=| a i,j |,  i,j=1, ..., n,  ai,j=f(i,j), где  f(i,j) =  4 ( 3.5 - i ) - 1.5 j ^ 2 + 20 cos( i j ).
2. Из матрицы  A получить компоненты вектора  X={xi}, i=1,2,...,n, по следующему правилу: в качестве последнего элемента вектора взять произведение значений элементов той строки и того столбца матрицы, на пересечении которых находится ее первый отрицательный элемент. Все предыдущие элементы вектора заполнить элементами столбца ] (n+1)/2 [ (функция Round), отбросив последний.
3. Преобразовать вектор в соответствии с правилом: i-й элемент вектора равен  (хi + хn-i + хn-i-1)/3 где i=n-2,1 по вектору

Если кто может помогите...кто не хочет..так и будет, но чуствую завалюсь... :(
поступил на заочку и какого спрашивается..ведь есть уже одна вышка?


 
k2 ©   (2006-11-15 17:07) [28]

прошлая вышка и нынешняя какие специальности если не секрет?
а то охота пройтись по поводу - но недостаточно информации


 
TauRus ©   (2006-11-15 17:18) [29]

да, инжинер-механик...а счас на администратора поступил..по работе нуна

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


 
Energizer ©   (2006-11-15 19:37) [30]

К какому сроку ?


 
Алхимик ©   (2006-11-15 23:28) [31]


> 1. Получить элементы квадратной матрицы  А=| a i,j |,  i,
> j=1, ..., n,  ai,j=f(i,j), где  f(i,j) =  4 ( 3.5 - i )
> - 1.5 j ^ 2 + 20 cos( i j ).

procedure DetskiySad;
const
  n = 100;
type
  TVector = array [1..n] of array [1..n] of double;
var
  i, j: integer;
  a : TVector;
begin
  for i := 1 to n do
     for j := 1 to n do
        a[i, j] := 4 * (3.5 - i) - 1.5 * j * j + 20 * cos(i * j);
end;


 
Алхимик ©   (2006-11-15 23:29) [32]

Может модуль для cos надо подключать в паскале... Не помню.


 
TauRus ©   (2006-11-16 09:36) [33]

Алхимик ©  
огромное спасибо..

Energizer ©  

> К какому сроку ?

ну...еще 2-3 недели есть... но нужно ихх показать... сделать 2 предмета еще... и виучить наконецто Паскаль...:) (тоесть время знайти)


 
TauRus ©   (2006-11-16 09:38) [34]


> procedure DetskiySad


шутники :)))


 
TauRus ©   (2006-11-16 19:13) [35]

простите, если что за наглость, а полностью помочь можете?


 
Плохиш ©   (2006-11-16 19:16) [36]


> TauRus ©   (15.11.06 17:18) [29]
> да, инжинер-механик...а счас на администратора поступил.
> .по работе нуна
>
> да, вот уже 6 лет прошло

Не верю! Про второе высшее, тут и первым-то близко не пахнет.


 
Energizer ©   (2006-11-16 19:27) [37]

>TauRus ©   (16.11.06 19:13) [35]
>простите, если что за наглость, а полностью помочь можете?

Угу и бесплатно !
Скажем, до 26 ноября. Идёт ?


 
Алхимик ©   (2006-11-16 19:29) [38]

> простите, если что за наглость, а полностью помочь можете?

Не стыдно? У меня на лабораторных работах девочки гуманитарии полистав
методичку делали такие примерчики на ура...
> а счас на администратора поступил..по работе нуна

Администратор простите чего? Мотеля?


 
TauRus ©   (2006-11-17 09:48) [39]


> Не верю! Про второе высшее, тут и первым-то близко не пахнет.


мда, я вот тоже бы так подумал... все время матан учил неплохо... а тут.. блин, склероз или стараею...


> Скажем, до 26 ноября. Идёт ?


да..спасибо...


> Администратор простите чего? Мотеля?


хм.. кабы..:) да, выучу я паскаль... седня и начну розбыраться...


 
alien1769 ©   (2006-11-17 10:30) [40]

Для автора: http://pascal.sources.ru/

> Алхимик ©   (15.11.06 23:29) [32]
> Может модуль для cos надо подключать в паскале... Не помню.
>

Нет. Функция Cos() из стандратного модуля System.
Размерность твоей матрицы 100 по типу double это много для сегмента данных.



Страницы: 1 2 вся ветка

Форум: "Прочее";
Текущий архив: 2006.12.17;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.54 MB
Время: 0.048 c
2-1164547518
Мишок
2006-11-26 16:25
2006.12.17
автозагрузка


15-1164569808
Колдун
2006-11-26 22:36
2006.12.17
Диз дельфимастера


3-1160504139
Kolan
2006-10-10 22:15
2006.12.17
Что почитать по работе с MS SQL Server в Delphi?


8-1146657387
MaFon
2006-05-03 15:56
2006.12.17
Кто-нибудь работал с DSPack?


2-1164636182
Фёдр_иваныч
2006-11-27 17:03
2006.12.17
Разложение числа на множетели





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский