Function kasLeidubHaapsaluVoiKuressaare(linnaloetelu)
  leidub = "ei"
  For Each linn In linnaloetelu
    If linn = "Haapsalu" Or linn = "Kuressaare" Then leidub = "jah"
  Next linn
  kasLeidubHaapsaluVoiKuressaare = leidub
End Function