Зразок виконання завдання. Побудувати графіки функції в полярних координатах:

Побудувати графіки функції в полярних координатах:

R =1 + 2 * COS(Z),

R=SIN(7*Z)

 

Програма

BEGIN1:

CLS

' Графіки в полярних координатах

COLOR 14, 3

LOCATE 4, 20

PRINT "Графіки в полярних координатах ";

PRINT: PRINT "1. R=1+2*COS(Z) – слимак Паскаля";

PRINT: PRINT "2. R=SIN(7*Z) - семипелюсткова роза";

PRINT: PRINT "Вкажіть номер рівняння";

INPUT N

DEF fna (Z)

IF N = 1 THEN fna = 1 + 2 * COS(Z)

IF N = 2 THEN fna = SIN(7 * Z)

END DEF

PRINT: PRINT "Для стандартного PSET A=1, B=1";

PRINT "Введіть значення A": INPUT A

PRINT "Введіть значення B";: INPUT B

PRINT

PRINT "Введіть масштабний коефіцієнт для зменшення чи збільшення";

PRINT "розміру графіка (ціле додатне число >40)";

INPUT Q

CLS

'Побудова графіків

SCREEN 9

COLOR 1, 7

PI = 3.14

FOR Z = 0 TO 2 * PI STEP .001

PSET (300 + Q * (fna(Z) * COS(A * Z)), 150 + Q * fna(Z) * SIN(B * Z))

NEXT Z

'Закінчення таповтор виконання програми

LOCATE 1, 2

PRINT "Якщо треба повторити виконання програми натисніть (Y), інакше - (N)";

BEGIN2:

G$ = INKEY$

IF G$ <> LCASE$("Y") AND G$ <> LCASE$("N") THEN GOTO BEGIN2

IF G$ = LCASE$("Y") THEN GOTO BEGIN1

END

Результат виконання програми див. на рис. 16.3. та 16.4.:

Контрольні запитання

1. Як задаються полярні координати.
2. Перечисліть функції в полярних координатах.
3. Як побудувати графік функції в полярних координатах?

Варіанти завдань

 

Побудувати графік функції в полярній системі координат (R, Z):

 

№ варіанту	Формула	Вигляд кривої
	R=1	коло
	R = 2 cos Z	коло
	R=1+SIN(2*Z)	двопелюсткова троянда
	R = 10 sin 3Z	трьохпелюсткова троянда
	R=SIN(2*Z)	чотирьохпелюсткова троянда
	R=SIN(7*Z)	семипелюсткова троянда
	R=1+2*COS(Z)	слимак Паскаля
	R=1+COS(Z)	кардіоїда
	R=Z/4	спіраль
	R=1+2*COS(2*Z)	петельне зчеплення
	R = Z/2	спіраль Архимеда
	R = ez	логарифмічна спіраль
	R =	гиперболічна спіраль
	R = 1/ sin Z	пряма лінія
	R = sec2	парабола
	R = a2 cos 2Z (a>0)	Лемніската Бернуллі