A Maple egy fejlett matematikai problémamegoldó és programozói szoftver.
-
xDJCx #155 Többféleképpen is lehet, egy megoldás (Maple 10 worksheetben):
restart:
#szukseges rajzolo csomagok betoltese:
with(plots): with(plottools):
#egyenesek es a kor kepletei
e1 := 2*x+3;
e2 := 3*x+9;
kor := x^2+y^2 = 25;
# felirat hozzajuk: stringbe konvertalva a kepleteket
e1felirat := convert(y = e1, 'string'):
e2felirat := convert(y = e2, 'string'):
korfelirat := convert(kor, 'string'):
# az egyenesek , a kor es a feliratok abrait kulon elkeszítjuk:
abra1 := plot(e1, x = -15 .. 15, y = -15 .. 15, color = blue):
abra2 := plot(e2, x = -15 .. 15, y = -15 .. 15, color = red):
# implicit figgveny rajzolasa: (implicit, azaz nincs y kifejezve...)
abra3 := implicitplot(kor, x = -15 .. 15, y = -15 .. 15, color = green):
# ez lesz akor kozeppntja:
abra4 := disk([0, 0], .2, color = green):
# szovegek abrakba:
abra5 := textplot([6, 10, e1felirat]):
abra6 := textplot([-3, 8, e2felirat]):
abra7 := textplot([6, 5, korfelirat]):
# a display utasítassal egyszerre rajzoltatjuk ki oket:
display([abra1, abra2, abra3, abra4, abra5, abra6, abra7], scaling = constrained);
( : -vel zárva a sorokat nem írja ki az eredményt.)
Az egyes parancsok részelteit a helpben érdemes megnézni: ?parancs
![]()
