Два вектора заданы своими координатами.Вычислить длины этих векторов и сравнить их.

@Vadim050596 · Регистрация: 03.10.2013

Два вектора заданы своими координатами.Вычислить длины этих векторов и сравнить их.
Задача по пользовательские процедуры.

Комментарий модератора

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

magirus · 24.11.2013, 12:27

Комментарий администратора

называйте темы информативно, согласно правил форума

@Cyborg Drone · 13.01.2014, 23:51

Векторы какие? Свободные, скользящие или фиксированные? Какова метрика пространства?

@Vadim050596 · 14.01.2014, 13:33 **[ТС]**

Сообщение от Cyborg Drone

Векторы какие? Свободные, скользящие или фиксированные? Какова метрика пространства?

простые!без ничего

@APALoff · 14.01.2014, 15:36

Pascal

Const n=10;
Var
  V1,V2 : array[1..N] of Integer;
  L1,L2 : Real;
  i : Longint;
Begin
  {...}
  { блок получения/ввода/считывания/генерирования значений векторов  - пишите сами на выбор...}
  {...}
  L1:=0; L2:=0;
  For i:=1 to n do
  Begin
    L1:=L1+Sqr(V[i]);
    L2:=L2+Sqr(V[i]);
  End;
  L1:=SQRT(L1);
  L2:=SQRT(L2);
  If L1>L2 then Writeln('Первый больше второго.')
    else Writeln('Второй больше первого');
End.

@Cyborg Drone Модератор 9530 / 4858 / 3229 Регистрация: 17.08.2012 Сообщений: 15,202
	13.01.2014, 23:51	3
	Векторы какие? Свободные, скользящие или фиксированные? Какова метрика пространства? 0

@Vadim050596 1 / 1 / 0 Регистрация: 03.10.2013 Сообщений: 34
	14.01.2014, 13:33 [ТС]	4
	Сообщение от Cyborg Drone Векторы какие? Свободные, скользящие или фиксированные? Какова метрика пространства? простые!без ничего 0

Опции темы