Паскаль

[Кэт]

Составить программу с использованием записей для выполнения указанного условия

заданны координаты начала и конца двух векторов. Найти вектор разности

[russian-stalker]

Наработки таки опять?

[Кэт]

Program primer;
type
vektor=record
x1:real;
y1:real;
z1:real;
end;
var
e,f,g,i,x1,y1,z1,c,d:real;
a,b:vektor;
begin
writeln('Введите координаты x,y,z вектора a');
readln(a.x1);
readln(a.y1);
readln(a.z1);
writeln('Введите координаты x,y,z вектора b');
readln(b.x1);
readln(b.y1);
readln(b.z1);
e:=0;
d:=0;

и что далбше делать?

[MadReason]

вычитай из координат а соответственные координаты b. по написанию программы, все векторы выходят из начала координат

[Stilet]

Автор. Иди почитай правила.
Тему закрываю за кросспост и название.