Нарисовать эллипс, не используя оператор CIRCLE - Turbo Pascal

  1. Нарисовать эллипс, не используя оператор CIRCLE. Уравнение эллипса X2/A2 + Y2/B2 = 1


textual

Код к задаче: «Нарисовать эллипс, не используя оператор CIRCLE - Turbo Pascal»

uses graph,crt;
var x0,y0,x,y,a,b:integer;
    u:real;
begin
clrscr;
repeat
write('a[50..300] a=');
readln(a);
until(a>=50)and(a<=300);
repeat
write('b[50..200] b=');
readln(b);
until(b>=50)and(b<=200);
initgraph(x0,y0,'');
x0:=getmaxX div 2;
y0:=getmaxY div 2;
u:=0;
moveto(x0+round(a*cos(u)),y0-round(b*sin(u)));
setcolor(12);
while u<=2*pi do
 begin
  lineto(x0+round(a*cos(u)),y0-round(b*sin(u)));
  u:=u+0.01
 end;
readln
end.

СДЕЛАЙТЕ РЕПОСТ

8   голосов, оценка 3.750 из 5



Похожие ответы
  1. Рисунок 34 (грузовик) Заранее спасибо

  1. Собственно нужно нарисовать используя graph ламповый диод как на картинке,долго бился над этим(т.к. этого мы еще не проходили),но все-таки получилось что-то более-менее сносное.Тем не менее т.к. я использовал дугу эллипса линии вышли под углом,можно ли как-нибудь выровнять их?

  1. Написать программу с применением динамических переменных движения квадрата параллельно оси Y,а зачем параллельно оси Х.С изменением направления движения изменять цвет закраски фигуры. Если можно то с описанием.

  1. Нужно нарисовать стрелу повёрнутую влево, право, вверх , вниз. Как сделать чтоб можно было выбрать какое изображение строится? Например нажимают "1" -влево "2"- вправо "3"-вверх "4"-вниз Вот изображения стрел Вправо:

  1. Нарисовать квадрат , который постоянно менянт цвет а когда нажимаешь любую клавишу прекращает.

  1. Задание Что касается задания,значит верхнюю фигуру надо нарисовать от верхнего поля, а нижнюю от конца поля. Потом надо их сдвигать друг к другу, после того как они сойдутся, они должны разойтись.

  1. Нарисовать цепочку из квадратов, расположенных на диагонали экрана. С клавиатуры вводятся значение ребра квадрата и значение ребра малого квадрата, получающегося при наложении квадратов друг на друга.

  1. Нужна помощь с графикой. Нужно нарисовать простой вентилятор (круг с 2-3 треугольниками внутри) у которого вращение лопастей включается/выключается нажатием клавиши на клавиатуре.

  1. Не могу понять как нарисовать закрашенные треугольные лучи солнца (картинка во вложении), код ниже: