Public Function hypotenuus(kaatet1, kaatet2)
  hypotenuus = Sqr(kaatet1 ^ 2 + kaatet2 ^ 2)
End Function