решить ур-ие

@Олег_Буланов · Регистрация: 05.05.2010

Студворк — интернет-сервис помощи студентам

Решить уравнение dx=c, где d – длина вектора и с – длина вектора .
Вычисление длины вектора оформить в виде функции. составить программу!)

echs · 17.08.2016, 09:23

Переменной N - обозначена размерность пространства

QBasic/QuickBASIC

CLS
RANDOMIZE TIMER
INPUT "N = "; n
DIM vc(1 TO n)
DIM vd(1 TO n)
 
FOR i = 1 TO n
   vc(i) = 20 * RND - 10
   vd(i) = 20 * RND - 10
NEXT
 
FOR i = 1 TO n
   PRINT vc(i);
NEXT
PRINT : PRINT
 
FOR i = 1 TO n
   PRINT vd(i);
NEXT
PRINT : PRINT
 
FOR i = 1 TO n
   c2 = c2 + vc(i) ^ 2
   d2 = d2 + vd(i) ^ 2
NEXT
 
c = SQR(c2)
d = SQR(d2)
x = c / d
PRINT x
END

@Олег_Буланов 0 / 0 / 0 Регистрация: 05.05.2010 Сообщений: 6
		1
	решить ур-ие 06.05.2010, 10:11. Показов 1274. Ответов 1 Метки нет (Все метки) Решить уравнение dx=c, где d – длина вектора и с – длина вектора . Вычисление длины вектора оформить в виде функции. составить программу!) 0

	17.08.2016, 09:23

Опции темы

решить ур-ие

Решение