Математическое моделирование: исследовать влияние увеличения шага по времени ∆t на решение вблизи сепаратрисы

@Juliaa · Регистрация: 24.10.2013

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

С помощью уравнения сепаратрисы найти соответствующие начальные условия и построить ее на экране. исследовать влияние увеличения шага по времени ∆t на решение вблизи сепаратрисы, используя для контроля закон сохранения энергии.

Добавлено через 21 час 45 минут
помогите пожалуйста решить задачу

Добавлено через 1 час 49 минут

Pascal

uses graphabc;
 
procedure Vrash(a: real; var x, y: integer; x0, y0, d: integer);
begin
  a := a * pi / 180;
  x := x0 + round(d * cos(a));
  y := y0 - round(d * sin(a));
end;
 
var
  x0, y0, x, y, d: integer;
  a: real;
  step: integer;
 
begin
  setwindowsize(500, 500);
  x0 := windowwidth div 2;
  y0 := windowheight div 2;
  a := 310;
  d := 100;
  step := 1;
  Setpencolor(clBlack);
  setpenwidth(3);
  lockdrawing;
  while true do
  begin
    clearwindow;
    Vrash(a, x, y, x0, y0, d);
    line(x0, y0, x, y);
    circle(x, y, 10);
    redraw;
    sleep(10);
    if ((step = 1) and (a = 330)) or ((step = -1) and (a = 210)) then step := -step;
    a := a + step;
  end;
end.

преподаватель сказал что то здесь нужно изменить и получится задача

Добавлено через 22 секунды
только я не понимаю что нужно исправить

Добавлено через 21 час 45 минут
люди помогите пожалуйста

Добавлено через 22 часа 19 минут
завтра уже сдавать. а я еще ничего не решила(((

@Juliaa · 19.10.2015, 19:14 **[ТС]**

люди помогите пожалуйста(((((

@Juliaa 2 / 2 / 1 Регистрация: 24.10.2013 Сообщений: 200
	19.10.2015, 19:14 [ТС]	2
	люди помогите пожалуйста((((( 0

Опции темы