Объяснение:= 18; { радиус }
w1 = -0.035; { угловая скорость }
w2 = -0.034; { угловая скорость }
w3 = -0.033; { угловая скорость }
o1 = 180; { радиус вращения }
Var
x,y,t:integer;
begin
setwindowsize(900,600); {размер окна}
x:=450; y:=300; {центр окна}
lockdrawing; {рисование во внеэкранном буфере}
setpenwidth(2);
t := 0;
repeat
clearwindow; {очищение окна}
DrawCircle(450, 300, 200);
DrawCircle(450, 300, 160);
DrawCircle(450, 300, 120);
DrawCircle(450, 300, 80);
t:=t+1;
setbrushcolor(clLime); {время движения }
circle(x + round(o1 * cos(t*w1)), y - round(o1 * sin(t*w1)), r1);
setbrushcolor(clSkyBlue);
circle(x + round(o1 * cos(t*w2)), y - round(o1 * sin(t*w2)), r1);
setbrushcolor(clPurple);
circle(x + round(o1 * cos(t*w3)), y - round(o1 * sin(t*w3)), r1);
sleep(1); {задержка}
redraw; {формирование нового кадра}
until False;
end.
Поделитесь своими знаниями, ответьте на вопрос:
Информатика 5 класс.. запишите сложные высказывание об автомобиле, используя логические связки не, и, или. выделите и обозначьте простые высказывания именами логических величин. запишите каждое сложное высказывание с логического выражения. сложное высказывание. использование связок в сложном высказ. логическое выражение. 1.кончился бензин 2.и бензин есть, и двигатель работает. 3.бензин есть, но двигатель не исправен. 4.может быть, двигатель просто сломался, а может-просто бензин кончился.
1. Не бензин
2. И бензин, и двигатель
3. Бензин, но не двигатель
4. Не бензин или не двигатель