Помогите с заданием .Написать программу нахождение длины отрезка зная коардинаты начала и...

0 голосов
26 просмотров

Помогите с заданием .Написать программу нахождение длины отрезка зная коардинаты начала и конца отрезка на языке pascal abc срочно нужено !


Информатика (163 баллов) | 26 просмотров
Дан 1 ответ
0 голосов

//PascalABC.Net 3.2
begin
var x1:=readinteger('x1 =');
var y1:=readinteger('y1 =');
var x2:=readinteger('x2 =');
var y2:=readinteger('y2 =');
write ('Длина: ', sqrt(sqr(x1-x2)+sqr(y1-y2)));
end.

(3.8k баллов)
0

Спасибо