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

← →
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 это много для сегмента данных.

← →
Energizer © (2006-11-17 11:40) [41]

TauRus
В выходные (в эти) будут вопросы по заданию (возможно). Кину сюда, либо в аську тукну...

← →
TauRus © (2006-11-18 11:03) [42]

> В выходные (в эти) будут вопросы по заданию (возможно).
> Кину сюда, либо в аську тукну...

Спасибо, огромное человеческое спасибо... даже незнаю чем отблагодарить...

← →
Energizer © (2006-11-19 14:13) [43]

Ух, собссно, кетчены:

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 ).

1. cos(ij), я так понимаю, это cos(i*J радиан) ?

2. Из матрицы A получить компоненты вектора X={xi}, i=1,2,...,n, по следующему правилу: в качестве последнего элемента вектора взять произведение значений элементов той строки и того столбца матрицы, на пересечении которых находится ее первый отрицательный элемент. Все предыдущие элементы вектора заполнить элементами столбца ] (n+1)/2 [ (функция Round), отбросив последний.

2. Как определяется "первый" отрицательный элемент матрицы - начиная с верхней строки слева направо ?
3. Как вычислять последний элемент вектора в случае отсутствия у неё отрицательных элементов ?
4. Что означают квадратные скобки во фрагмене "элементами столбца ] (n+1)/2 [" ? Если это обозначение целой части числа, то по-моему нужно [ ]. Или это какой-то дискретный предел двустороннего континуума ?
5. Элементы вектора, кроме последнего, заполняются элементами столбца ] (n+1)/2 [ матрицы в прямом порядке или обратном ?

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

7. Проги должны быть написаны в DOS-овском паскале ?
8. С какой точностью выводить числа ?
9. Каким должен быть процент глюков программы ?
10. Нужны ли комменты в программе ?
11. Требуется ли оптимизация кода ?
12. Нужен ли help к программе ?

Пока всё ->*

← →
TauRus © (2006-11-20 09:54) [44]

> Energizer ©

> 7. Проги должны быть написаны в DOS-овском паскале ?
> 8. С какой точностью выводить числа ?
> 9. Каким должен быть процент глюков программы ?
> 10. Нужны ли комменты в программе ?
> 11. Требуется ли оптимизация кода ?

7. да
8.9. мне неважно..
10.11. желательно ;) если не лень

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

да, без использования оператора goto

и наверно... только ты решил помочь с решением... всем лень или чтото хотят взамен...

← →
Алхимик © (2006-11-20 10:35) [45]

> всем лень или чтото хотят взамен...

Ну тебе то тоже лень, чем мы хуже?

> Ну тебе то тоже лень, чем мы хуже?

блин... я только начинаю осваивание..

> TauRus © (20.11.06 12:36) [46]
>
> > Ну тебе то тоже лень, чем мы хуже?
>
>
> блин... я только начинаю осваивание..

Это что, новый вариант фразы "Сами мы не местные"?

а..что хотите то и думайте..

Так.. TauRus, если нужна прога - оставь мыло...

← →
Nic (from first work) (2006-11-27 12:55) [50]

Фишка а в том, что на 1 лабу нужно значительное время, особенно, если учитывать все детали типа корректности введённых данных, аккуратный вывод и т. д.

Поэтому, бесплатно её сделает тот, у кого есть свободное время. Может быть найдёте их. Спросили бы что именно непонятно -- здесь с радостью бы ответили.

выш...

TauRus, это что - игнор ?
:|

> Cyrax ©

извини... сегодня только на работе появился...

вот есть начало...

Program zad_2;
uses Crt;
const
n=100;
var
i,j,k,i1,j1: integer;
matrix:array[1..n,1..n] of real;
Begin
ClrScr;
write ("Vvedite razmernost matrix ne > ",n," n=");
readln (k);
j1:=0;
{zadanie 1 + naxozhdenie koordinat otricatelnogo elementa}
For i:=1 to k do
for j:=1 to k do
begin
matrix[i,j]:=4*(3.5-i)-1.5*(j*j)+20*cos(i*j);
if (matrix[i,j]<0) and (j1=0) then
begin
i1:=i;
j1:=j;
end;
if j<k then
write ("A[",i,",",j,"]=",matrix[i,j]:2:2," ")
else
writeln ("A[",i,",",j,"]=",matrix[i,j]:2:2);
end;
{zadanie 2}

End.

нужно закончить...полное задание в 27 посте..
и если есть ошыбки или вдруг чтото не так скажи...ок?

Удалено модератором
Примечание: Личная переписка

Удалено модератором

> TauRus © (29.11.06 11:34) [59]
>
> > Cyrax ©
>
> выдает ошыбку 202 в 0000:010Е, как только ввел размерность
> матрицы...

Я заранее предупреждал.

> Размерность твоей матрицы 100 по типу double это много для
> сегмента данных

Используй указатели на записи.

> Размерность твоей матрицы 100 по типу double это много для сегмента данных

понял...нужно 64? это макс?

Размер данных не может превышать 65520 байт.
Поскольку тип доубле = 8 байт то матрица может быть построена только на указателях, либо измени размерность до 10.

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