Задача с массивами в Visual Basic 6.0 - VB

Формулировка задачи:

Даны целые числа а1, а2, а3. Получить целочисленную матрицу [bij]i,j=1,2,3, для которой bij=ai-3aj. Задача вроде и не сложная, математическая модель простая, но на язык Basic перевести не получается..

Код к задаче: «Задача с массивами в Visual Basic 6.0 - VB»

textual
dim a(1 to 3) as long, b(1 to 3, 1 to 3) as long, i as long, j as long
a(1)=...'вставьте число
a(2)=...'вставьте число
a(3)=...'вставьте число
for i=1 to 3
  for j=1 to 3
    b(i,j)=a(i)-3*a(j)
  next
next

12   голосов, оценка 3.750 из 5


СОХРАНИТЬ ССЫЛКУ