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]
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 |
Dnevnik.hr
Gol.hr
Zadovoljna.hr
Novaplus.hr
NovaTV.hr
DomaTV.hr
Mojamini.tv