Kto mi poradí ako mám previesť stupne na radiany(používam Pi*S /180).....pretože potrebujem počítať cez ArcTan....dlzku kruznice......lenže ono mi to vychádza inak ako ked počítam na kalkulačke zo stupnami....možno neviete o čom hovorím.....neskor sem hodím zdroják...
Pascal ArcTan... :/ :D
Pascal ArcTan... :/ :D
Ahojte,
Kto mi poradí ako mám previesť stupne na radiany(používam Pi*S /180).....pretože potrebujem počítať cez ArcTan....dlzku kruznice......lenže ono mi to vychádza inak ako ked počítam na kalkulačke zo stupnami....možno neviete o čom hovorím.....neskor sem hodím zdroják...
Kto mi poradí ako mám previesť stupne na radiany(používam Pi*S /180).....pretože potrebujem počítať cez ArcTan....dlzku kruznice......lenže ono mi to vychádza inak ako ked počítam na kalkulačke zo stupnami....možno neviete o čom hovorím.....neskor sem hodím zdroják...
-
audiotrack
VIP
- Príspevky: 25958
- Registrovaný: 09 sep 2005, 18:39
- Kontaktovať používateľa:
Re: Pascal ArcTan... :/ :D
stupne na radiany prevádzaš správne, tak ak ti to vychádza inak, daj ten zdroják, lebo očividne ty nevieš o čom hovoríš, a nie my 
Re: Pascal ArcTan... :/ :D
program TOZ;
uses crt;
var T,R,A : real;
Begin
ClrScr;
writeln('Zadaj polomer [R]: ');
readln(R);
writeln('Zadaj uhol Alfa: ');
readln(A);
A := A/2;
A := Pi * A / 180;
T := R * ArcTan(A);
writeln('Tycnica je dlha :',T:3:2, ' metrov.');
readkey;
End.
/ Polomer= 1500m, Uhol Alfa=35 stupňov.
Riešenie:
V stupňoch (na kalkulačke):
Takto to má výsť na 100%
T = R * tan (A/2)
T = 1500 * tan (35/2)
T = 1500 * 0.3153
T = 472.95 metra
V Pascale s vyššie uvedeným zdrojákom to vychádza 444.65 metra.
Kde robím chybu?
Za odpovede vopred Diiiik
uses crt;
var T,R,A : real;
Begin
ClrScr;
writeln('Zadaj polomer [R]: ');
readln(R);
writeln('Zadaj uhol Alfa: ');
readln(A);
A := A/2;
A := Pi * A / 180;
T := R * ArcTan(A);
writeln('Tycnica je dlha :',T:3:2, ' metrov.');
readkey;
End.
/ Polomer= 1500m, Uhol Alfa=35 stupňov.
Riešenie:
V stupňoch (na kalkulačke):
Takto to má výsť na 100%
T = R * tan (A/2)
T = 1500 * tan (35/2)
T = 1500 * 0.3153
T = 472.95 metra
V Pascale s vyššie uvedeným zdrojákom to vychádza 444.65 metra.
Kde robím chybu?
Za odpovede vopred Diiiik
Re: Pascal ArcTan... :/ :D
Tak sa rozhodni ci chces pouzivat tangens, alebo arkus tangens. Tangens je goniometricka funkcia, kdezto arkus tangens je cyklometricka. Na tvojej kalkulacke pocitas s tangensom, v tvojom zdrojovom kode vidim ArcTan 
Re: Pascal ArcTan... :/ :D
Do kelu!
Prečo som ja vždy v tej škole iba spal?

Ale vieš....V Pascale existuje iba ArcTan.....žiadny Tan.....ako sa to do vyriešiť?
Prečo som ja vždy v tej škole iba spal?
Ale vieš....V Pascale existuje iba ArcTan.....žiadny Tan.....ako sa to do vyriešiť?
Re: Pascal ArcTan... :/ :D
Ty by si v tej skole mal fakt davat pozor.
Kód: Vybrať všetko
tan(x) = sin(x)/cos(x)Re: Pascal ArcTan... :/ :D
Hmmm.....Máš to u mňa.... 
//autoeditácia príspevku (07 Mar 2012, 16:21)
A ešte....čosi...
Keď dám v Pascale cos(17.5)
tak mi to dá 0.22
ale klasicky na kalkulacke je to 0.9537...
čo s tím?
//autoeditácia príspevku (07 Mar 2012, 16:21)
A ešte....čosi...
Keď dám v Pascale cos(17.5)
tak mi to dá 0.22
ale klasicky na kalkulacke je to 0.9537...
čo s tím?
-
mirak2
Hardcore addict
- Príspevky: 6719
- Registrovaný: 18 sep 2005, 13:44
- Bydlisko: Prague, CZE / Kosice, SVK
Re: Pascal ArcTan... :/ :D
do pi*i sak trochu samostatnosti, na google mas ban? tu som ti to nasiel
Re: Pascal ArcTan... :/ :D
program H;
uses crt;
var Z,A : real;
begin
clrscr;
writeln('Zadaj uhol Alfa: ');
readln(A);
Z := 180*A/Pi;
Z := cos(Z);
writeln('cos = ',Z:3:2,'');
readln;
end.
skusil som.....ale aj tak vychadzaju blbosti.....treba to ešte premenit na späť ti radiany alebo čo?
uses crt;
var Z,A : real;
begin
clrscr;
writeln('Zadaj uhol Alfa: ');
readln(A);
Z := 180*A/Pi;
Z := cos(Z);
writeln('cos = ',Z:3:2,'');
readln;
end.
skusil som.....ale aj tak vychadzaju blbosti.....treba to ešte premenit na späť ti radiany alebo čo?
Re: Pascal ArcTan... :/ :D
Vies vobec co to je kosinus, ked davas blbosti typu ci funkcnu hodnotu tejto funkcie, treba premenit na radiany? 
A len tak mimochodom, asi ocakavas ze premenna A su stupne, prevod zo stupnov na radiany jekde rad su radiany a deg su stupne
A len tak mimochodom, asi ocakavas ze premenna A su stupne, prevod zo stupnov na radiany je
Kód: Vybrať všetko
rad = deg * PI / 180