Нарисовать фигуры по заданным координатам центра, радиусу дуг и цвету - Pascal ABC

  1. 1.Создайте процедуру, рисующую дугу по заданным координатам центра, радиусу и значению второго угла (Первый угол равен нулю). Выведите ракушку: Скриншот во вложении 2. Создайте процедуру, рисующую символ инь-янь по заданным координатам, радиусу дуг и цвету. (скриншот во вложении);


textual

Код к задаче: «Нарисовать фигуры по заданным координатам центра, радиусу дуг и цвету - Pascal ABC»

uses graphABC;
procedure duga(x,y,r,a:integer);
begin
setpencolor(clRed);
arc(x,y,r,0,a);
end;
var i,a,r,x,y:integer;
begin
setwindowsize(600,600);
centerwindow;
y:=windowheight div 2;
x:=3*windowwidth div 4;
r:=windowheight div 5;
a:=360;
for i:=1 to 11 do
 begin
  duga(x,y,r,a);
  x:=x-15;
  r:=r+15;
  a:=a-330 div 11;
 end;
end.

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

12   голосов, оценка 4.333 из 5



Похожие ответы
  1. Основания трапеции параллельны оси X, нижнее основание больше верхнего. Исходная точка, от которой начинается рисование трапеции, сверху справа. Задаем длины оснований трапеции N и K, высоту h, и координаты X1,Y1 одной вершины. Вычисляем координаты второй, третьей и четвертой вершин X2,Y2, X3,Y3, X4,Y4. Рисуем трапецию с помощью операторов Line по координатам четырех точек. Дополнительно необходимо нарисовать окружность, радиусом 5 пикселей, в точке Х1, Y1. (Примечание: для вычисления координат точек используется целочисленное деление DIV).

  1. Напишите программу с рисунком в Pascal ABC любым из 2 задания.

  1. 68. Нарисовать конус, заполненный на половину водой.

  1. 66. Нарисовать звезду на экране.

  1. 74. Нарисовать увеличение круга на экране.

  1. Ребят, привет. Вызвался помочь сестре со школьной задачей. И не справился) Проходят геометрические фигуры, дуги. Помогите на Pascal ABC изобразить вторую (правую) картинку. С первой я справился.

  1. 1.Нарисовать вращающийся треугольник 2.Составить программу, которая спрашивает у пользователя, в каком направлении должен двигаться шар: 1 – по горизонтали, 2 – по вертикали и какого цвета; и показывает нужное направление движения. 3.Написать программу, которая спрашивает у пользователя, как должен вести себя шар: 1 –расти из центра до границ экрана или 2 – уменьшаться от границ экрана к центру и его цвет; и показывать соответствующее изменение шарика.

  1. Нарисовать этот дорожный знак.

  1. Пользователь вводит число (сторону квадрата или сторону домика), необходимо нарисовать домик с крышей Собственно не знаю как нарисовать крышу. Также необходимо сделать окошко у домика (просто квадрат тоже). Вот так рисует тело дома:

  1. Нарисовать N кругов с радиусом от 5 до 50 в случайном месте случайным цветом в рамке.