Тема: Помогите составить цикл перемножения двух одномерных массивов
Показать сообщение отдельно
  #2  
Старый 16.11.2010, 17:37
Black Raider Black Raider вне форума
Местный
  
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию
Где то так:

Код:
For i:=1 to 4 do
  for j:=1 to 4 do
c[(i*i+(j-1))]:=k[i]*l[j];
__________________
Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение"
Ответить с цитированием