Question

Pascal.
Как записать на языке паскаля D = корень из (b-a) всё к квадрате + (p-c) всё в квадрате

Answer 1

sqr(A*2+b*2)
(s+p*2)
x+y/2
15*x-7/2

Вроде так,если честно не очень понятно написан вопрос 

Answer 2

Щас

Answer 3

Program McW0w; 
Var 
p,d,c,a,b: integer; 
begin 
Write('Введите первую координату : '); 
Read(a);
Write('Введите вторую координату : '); 
Read(b);
Write('Введите третию  координату : '); 
Read(c);
Write('Введите четвёртую координату : '); 
Read(p);
d:= sqrt тут нужно записать корень из (b-a) всё к квадрате + (p-c) всё в квадрате
Write(d);
end.

Answer 4

d:= sqr(sqr(sqrt(b-a)) + p - c)
вероятнее, вы не правильно написали, и p-c должно быть в квадрате, но я сделал как написано

Answer 5

Нууу, p-c и всё в квадрате.

Answer 6

Написано же)

Answer 7

Program McW0w; 
Var 
p,d,c,a,b: integer; 
begin 
Write('Введите первую координату : '); 
Read(a);
Write('Введите вторую координату : '); 
Read(b);
Write('Введите третию  координату : '); 
Read(c);
Write('Введите четвёртую координату : '); 
Read(p);
d:=sqr(sqr(sqrt(b-a)) + p - c)
Write(d);
end.

Answer 8

По формуле записать надо d:= Корень из (х2-х1) всё в кв. + (y2-y1) все в кв.