Поле направлений

12.08.2013, 14:31. **Показов** 1311. **Ответов** 2

Author24 — интернет-сервис помощи студентам

здравствуйте, помогите нарисовать поле направлений функции (x²+y²+x)^1/2/x

@саша40 · 12.08.2013, 16:37

начерти на бумаге карандашом. Задай самые обыкновенные точки. Потом уже на программный код.

murderer · 13.08.2013, 06:21

http://twt.mpei.ac.ru/math/ODE... 80000.html

На OnPaint формы

Delphi

const
  res=10; //разрешение (размер клетки поля в пикселях)
var
  x,y: integer;
  f:   single;
begin
  y:=1;
  repeat
    x:=1;
    repeat
      f:=sqrt(x*x+y*y+x)/x;
      Form1.Canvas.MoveTo(x,y);
      Form1.Canvas.LineTo(round(x+sin(f)*res),round(y+cos(f)*res));
      inc(x,res);
    until x>500;
    inc(y,res);
  until y>300;
end;

FOGEL484746
		1
	Поле направлений 12.08.2013, 14:31. Показов 1311. Ответов 2 Метки нет (Все метки) здравствуйте, помогите нарисовать поле направлений функции (x²+y²+x)^1/2/x

@саша40 157 / 300 / 47 Регистрация: 14.08.2012 Сообщений: 2,578
	12.08.2013, 16:37	2
	начерти на бумаге карандашом. Задай самые обыкновенные точки. Потом уже на программный код. 0

	13.08.2013, 06:21

Поле направлений

Решение