function spirala_archim(k)
%k..koeficient umernosti(k>0)


if k<=0
   error('Vstupem musi byt kladne cislo!')
end

syms alfa
ezpolar(k*alfa,[0 6*pi]) %graf

