±ÄØ%%ÐÒÏÇÒÁÍ ÌÉÃÚÙ ×ÁÒÔ® ÆÕÎË®º  ÁÒÛ%%ÓÉλ ÁÒàÃÏÓ» ÁÒàÔÇ» ÁÒàÃÔÇ® ›##Wartosc argum. musi byc rozna›##od 0, mniejsza od 1 i wieksza›od -1, np. 0.623› *** pobranie danych ***› R("(PODAJ WARTOSC ARGUMENTU8((X<>0 i |X|<1): B @O@€R(##*** sprawdzenie dziedziny ***›$$€")O:€,@@##*** skok do proc. l. i w. ***›!(RADIANY @P (STOPNIE @P($$*** ponowne uruchom. prog. ***›) @2$$*** proc. licz. i wyswiet. ***›3++(ARC SIN(€)=D:€'M:@&€$€,,4++(ARC COS(€)=D:M:@&€$€,'€,5(ARC TG(€)=D:€,6$$(ARC CTG(€)=D:@'€,7$€ D8:ATN2.BAS