Mathematica https://blog.dnevnik.hr/help

petak, 27.01.2012.

2

neznam al do sad ima ovo

y = Ax + By + C;
T = {X, Y};

sim[y_, T_] :=
Module[{d, a, b, S}, d = Abs[A*X + B*Y + C]/Sqrt[A^2 + B^2]; a = ;
b = ; S = {a, b}; S]

kasnije si zadat y=...pravac
i T točku a točku S bi trebalo izračunati, al nez program napisat, ako skuzim nadodam
i crtež je

slika1 = ListPlot[T, PlotStyle -> Red];
slika2 = ListPlot[S, PlotStyle -> Red];
slika3 = Plot[y, {x, -10, 10}];
Show[slika1,slika2, slika3]

27.01.2012. u 12:44 • 0 KomentaraPrint#^

<< Arhiva >>

Creative Commons License
Ovaj blog je ustupljen pod Creative Commons licencom Imenovanje-Dijeli pod istim uvjetima.

  siječanj, 2012  
P U S Č P S N
            1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31          

Siječanj 2012 (2)

Dnevnik.hr
Gol.hr
Zadovoljna.hr
Novaplus.hr
NovaTV.hr
DomaTV.hr
Mojamini.tv

Opis bloga

Linkovi