Напишите программу, которая вводит координаты двух точек на числовой оси и выводит расстояние между ними.(программа должна вывести одно число: расстояние между точками с тремя знаками в дробной части.) совсем не получается решить ,

Program rast;
var x, y, l: real;
begin
  writeln('введите две координаты');
  readln(x, y);
  l:=sqrt(sqr(x)+sqr(y));
  writeln('расстояние ', l:3:2);
end.

1.{1.Напишите программу, которая вводит два вещественных числа, x и y , и вычисляет значение x^y .(Нужно вывести одно значение – x^y – с тремя знаками в дробной части.)}
  var x,y,k:real;
begin
 readln(x,y);
 k:=exp(y*ln(x));
 writeln(k:3:3);
end.