Sinus a cosinus – Pascal – Fórum – Programujte.com

Zdrav??ko,

d?l? mi probl?m v?po?et sinu a cosinu...

m?m tento k?d:

program sin;

var sinus:real;



begin

sinus := sin(30);

write(sinus:1:4);

readln;

end.

preco by malo vypisat 0,5?

ved si to vypocitaj na nejakej kalkulacke.. viz http://www.google.com/search?client=opera&rls=en&q=sin+30&sourceid=opera&ie=utf-8&oe=utf-8

Pascal počítá s tím, že zadané je v radiánech, pokud chceš zadávat stupně, musíš je převést:

sinus := sin(30*pi/180);