1. Napište unitu, která bude poskytovat funkce linearsearch a
binarysearch.
  a. Funkce linersearch sekvenčně prohledá zadaná pole a vrátí true,
     pokud se v něm nachází prvek, předaný jako parametr. Jinak vrátí  
 
     false.
  b. Funkce binarysearch binárně prohledá zadané pole a vrátí true,
pokud
     se v něm nachází prvek, předaný jako parametr. Jinak vrátí false.

2. Napište unitu, která bude poskytovat datový typ utvar a funkce obvod
a obsah. 
Typ útvar ubsahuje:
  - typ útvaru (obdelnik, ctverec, kruh, trojuhelnik)
  - pole o maximálně čtyřech prvcích s délkami stran.
Funkce budou mít jeden parametr typu útvar a spočítají obvod resp.
obsah daného útvaru.