Icon/Funkcje

Z Wikibooks, biblioteki wolnych podręczników.

Funkcje języka WinIcon:

Spis treści 1 matematyczne 1.1 abs 1.2 acos 1.3 asin 1.4 atan 1.5 cos 1.6 dtor 1.7 exp

[edytuj] matematyczne

[edytuj] abs

abs(N): N

funkcja zwraca wartość bezwzględną argumentu numerycznego

 jeżeli argument numeryczny N jest
 real -> wynik jest real
 integer -> wynik jest integer

Przykład:

 procedure main()
   write("Function abs(N):")
   while (writes("L="),  L:=numeric(read())) do write("abs(L)=", abs(L))
 end

[edytuj] acos

acos(r): r

funkcja zwraca wartość arkus cosinus argumentu rzeczywistego

Przykład:

 procedure main()
   write("Function acos(r):")
   while (writes("r="),  L:=numeric(read())) do 
     if -1<r<1 then write("acos(r)=", acos(L))
               else write("Bad value of r (r not in range from -1 to 1)")
 end

[edytuj] asin

asin(r): r

funkcja zwraca wartość arkus sinus argumentu rzeczywistego

Przykład:

 procedure main()
   write("Function asin(r):")
   while (writes("r="),  L:=numeric(read())) do 
     if -1<r<1 then write("asin(r)=", asin(L))
               else write("Bad value of r (r not in range from -1 to 1)")
 end

[edytuj] atan

atan(r1, r2): r

funkcja zwraca wartość arkus tangens r1/r2 dla zakresu –pi/2 do pi/2

[edytuj] cos

cos(r): r

funkcja zwraca wartość cosinus argumentu rzeczywistego (radiany)

Przykład:

 procedure main()
   write("Function cos(r):")
   while (writes("r="),  L:=numeric(read()) then ) do 
     write("cos(r)=", cos(L))
 end

[edytuj] dtor

dtor(r): r

funkcja konwertuje wartość kąta podaną w stopniach na radiany

Przykład:

 procedure main()
   write("Function dtor(r):")
   while (writes("r="),  L:=numeric(read()) then ) do 
     write("dtor(r)=", dtor(L))
 end

[edytuj] exp

exp(r): r

funkcja zwraca wartość exp(r)

Przykład:

 procedure main()
   write("Function exp(r):")
   while (writes("r="),  L:=numeric(read()) then ) do 
     write("exp(r)=", exp(L))
 end