Задача

[Виталя5230]

на плоскости заданы точки A,B,C своими координатами xi ,yi, i=1,2,3 в декартовой системе координат. Найти расстояние каждой точки до точки D (-120,340)

[Joker_vad]

Сообщение от Виталя5230

на плоскости заданы точки A,B,C своими координатами xi ,yi, i=1,2,3 в декартовой системе координат. Найти расстояние каждой точки до точки D (-120,340)

В чем проблема то?

[Виталя5230]

я учусь на 1 курсе и в школе мы паскаль не проходили.т.е я не знаю как вообще ее делать

[Niro]

Вы не знаете как решить данную задачу или не знаете как реализовать её на паскале?

[Joker_vad]

program lab;
uses crt;
var
x:array [1..3] of integer;
y:array [1..3] of integer;
i:integer;
s:real;
zn1,zn2:real;
begin
clrscr;
for i:=1 to 3 do begin
write('x[',i,']=');readln(x[i]);
write('y[',i,']=');readln(y[i]);
zn1:=-120-x[i];
zn2:=340-y[i];
s:=sqrt(sqr(zn1)+sqr(zn2));
writeln('Расстояние=',s:5:3);
end;
readln;
end.

Бывал я в такой ситуации понимаю о чем речь.