2 задачи в паскале

[каринка]

1. Заданы два вектора X(x1,x2,x3), Y(y1,y2,y3) и матрица А третьего порядка. Найти сумму двух векторов c и d, где вектор с есть произведение вектора x на матрицу А, а вектор d - произведение вектора на матрицу А. Вычисление произведения вектора на матрицу оформить в виде процедуры.

2.Даны два массива Х и У. Размерность массивов n. Найти максимальный элемент массива Х и заполнить им массив Y.

помогите, пожалуйста, кто сможет. буду вам очень благодарна. это последние 2 задачи, которые мне надо сдать.

[Sazary]

Сообщение от каринка

это последние 2 задачи, которые мне надо сдать.

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

По первой: используйте поиск и найдете листинги программ по произведению матрицы на вектор.

По второй вообще сказать нечего. Все, что нужно, сказано в условии.

[каринка]

да, именно так. только вот не на массивы, не на матрицы задач не было. и вообще таких не проходили. я не на программичта учусь, а Паскаль все равно заставляют решать. те задачи, которые я сделала были на последовательность и на условный оператор if. и все...

[Sazary]

Сообщение от каринка

не на матрицы задач не было. и вообще таких не проходили.

Как-то не верится, что задачи есть, а материал не давали.

Массив объявляется так:

mas : array[1..10] of integer;

mas - массив их 10 целых чисел. Доступ к элементам по индексу:
mas[3] - доступ к 3-му элементу массива.

По первой задаче посмотрите тут:
http://programmersforum.ru/showthread.php?t=43509
http://programmersforum.ru/showthread.php?t=41696
и другие в поиске.

Набросок первой, для ознакомления, могу написать:

uses crt;
var
x,y : array[1..100] of integer;
i,n,max : integer;


begin
clrscr;
readln(n);

{ ввод массива x }
for i:=1 to n do
 readln(x[i]);

{ поиск максимума }
max := 1;
for i:=1 to n do
 if x[i]>x[max] then max := i;

{ заполнение y }
for i:=1 to n do
 y[i] := x[max];

readln;
end.

Вывод (если нужен) сами допишите.

[ЯН_КА]

зря не верите!у меня такая же ситуация!материалы не дают!а задачи задают!говорят,ищите в нете и разбирайтесь сами.я тоже далека от программирования.я не на программиста учусь,а задачи дают решать.

[Sazary]

говорят,ищите в нете и разбирайтесь сами.

Ну раз так, то материала достаточно. Заходите сюда -> http://programmersforum.ru/showthread.php?t=8324, качайте учебники. Материал, нужный для решения этих задач, можно изучить за несколько часов. А учитывая, что изучение будет не с нуля (ведь, по уверениям ТС, с некоторыми основами она уже знакома), то и еще меньше.

[ЯН_КА]

извините,пожалуйста,а вы мне не поможете?

[каринка]

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