figuraGeo.erl

text/x-erlang figuraGeo.erl — 1 KB

Continguts del fitxer

-module(figuraGeo).
-export([area/1]).
area({rectangle, Amplada, Ht}) -> Amplada * Ht;
area({cercle, R}) -> 3.14159 * R * R.