Математический форум Math Help Planet
http://mathhelpplanet.com/

Вычертить область заданную неравенствами
http://mathhelpplanet.com/viewtopic.php?f=33&t=27259
Страница 1 из 1

Автор:  kss_13 [ 27 окт 2013, 18:25 ]
Заголовок сообщения:  Вычертить область заданную неравенствами

ρ≥1-cosφ
ρ≤3-sinφ
0≤φ≤0.75pi

Автор:  Avgust [ 27 окт 2013, 19:05 ]
Заголовок сообщения:  Re: Вычертить область заданную неравенствами

with(plots): g1 := plot([1-cos(t), t, t = 0 .. 3*Pi*(1/4)], color = black, coords = polar): g2 := plot([3-sin(t), t, t = 0 .. 3*Pi*(1/4)], color = blue, coords = polar): display(g1, g2);

По этой проге вычерчивается Ваша замечательная фигура:

Изображение

Автор:  kss_13 [ 27 окт 2013, 19:33 ]
Заголовок сообщения:  Re: Вычертить область заданную неравенствами

Спасибо, сошлось с моим ответом.

Страница 1 из 1 Часовой пояс: UTC + 3 часа [ Летнее время ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/