function rAlfa=deg2rad(kat) rAlfa=(%pi*kat)/180 endfunction s=a+b r=a-b endfunction
warunek IF a,b liczby; d parametr oznaczający rodzaj działania function k=kalkulator(a,b,d) if d=='d' then k=a+b end if d=='o' then k=a-b end if d=='m' then k=a*b end if d=='dz' then k=a/b end endfunction
warunek IF a,b liczby; d parametr oznaczający rodzaj działania function k=kalkulator2(a,b,d) select d case 'd' then k=a+b case 'o' then k=a-b case 'm' then k=a*b case 'dz' then k=a/b end endfunction
pętla FOR sumuje wszystkie liczby całkowite w podanym przedziale function s=suma_oddo(poczatek,koniec) s=0 for i=poczatek:koniec s=s+i end endfunction
function k=trigCalc(alfa,d) if d=='r2g' then k=(alfa*200)/%pi end if d=='g2r' then k=(%pi*alfa)/200 end if d=='d2r' then k=(alfa*%pi)/180 end if d=='r2s' then k=(alfa*180)/%pi end endfunction