Function pii()
 pii=3.14
end function


function eurodeks (kroonid)
eurodeks=kroonid/15.1*0.99
end function

function valuutavahetus (algraha, kurss, komisjon)
if algraha<1000 then
valuutavahetus=algraha/kurss*(1-komisjon/100)
else
'KUI SUMMA ON VÄHEMALT TUHAT KROONI
'on komisjonitasu poole väiksem
valuutavahetus=algraha/kurss*(1-komisjon/2/100)
end if
end function


function valuutavahetus2 (algraha, kurss, komisjon)
if algraha<1000 then
valuutavahetus2=algraha/kurss*(1-komisjon/100)
else
'POOLE VÄIKSEM KOMISJONITASU TUHANDET KROONI
'ületavalt summalt
valuutavahetus2=1000/kurss*(1-komisjon/100)+ _
 (algraha-1000)/kurss*(1-komisjon/2/100)
end if
end function