module Main where

import Data.Functor
import Numeric

main :: IO ()
main =  do
  { [x,y,z,w] <- getDoubles
  ; putStrLn $ showFFloat Nothing (sqrt ((x-z)^2+(y-w)^2)) ""
  }

getDoubles :: IO [Double]
getDoubles = map read . words <$> getLine