Тема: Помогите составить цикл перемножения двух одномерных массивов
Показать сообщение отдельно
  #6  
Старый 16.11.2010, 18:18
Black Raider Black Raider вне форума
Местный
  
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию
For j:=1 to 4 do
for i:=1 to 4 do
c[(j*4-4+(i))]:=k[i]*l[j];

массив будет вот такой:
-35
14
-21
0
0
0
0
0
0
0
0
0
20
-8
12
0
__________________
Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение"
Ответить с цитированием