Графические примитивы это заранее определенные элементы, которые можно поместить в чертеж при помощи одной команды. Каждый графический примитив формируется на основании геометрического описания объекта.
Примитивы можно классифицировать:
<span>односложные и составные;
плоские и объемные (3d)</span>
Большинство команд обрисовки базовых примитивов собраны в подменю Рисовать. Каждый примитив формируется своей командой, чаще всего совпадают по имени с примитивом. Для некоторых примитив пользователю предлагается несколько способов построения одного и того же примитива по различным исходным данным, например окружность можно построить по центру и радиусу, по центру и диаметру, по трем точкам на плоскости и т.д. Каждый примитив обладает рядом свойств (например, принадлежность слою, цвет, видимость, тип линии и т.д.).
Некоторые команды требуют ввода дополнительных опций в командную строку.
Источник : http://life-prog.ru/view_autocad.php?id=9
Я доказала всего лишь один из законов, посмотри тот ли тебе нужен
Var
day, //номер дня
day_dist, //дистанция пройденная в этот день в метрах
sum_dist :integer;//дистанция пройденная за все дни
Begin
day_dist:=3000; //за первый день пробежал 3000 м.
sum_dist:=3000; //общая дистанция тоже 3000 м.
//Найти ответ можно тремя способами
//Вариант 1. цикл for
{
for day:=2 to 15 do begin //считаем со 2 по 15 день
day_dist:= day_dist + 200;//дневная дистанция увеличивается на 200 м.
sum_dist:= sum_dist + day_dist;//общая дистанция увеличивается на
дистанцию пройденную за день
end;
}
//Вариант 2. цикл while
{
day:=1; //первый день посчитан
while day < 15 do begin //пока не настал 15 день считаем
day := day +1; //увеличиваем номер дня
day_dist:= day_dist + 200; //увеличиваем дневную дистанцию
sum_dist:= sum_dist + day_dist; //увеличиваем общую дистанцию
end;
}
//Вариант 3. цикл repeat until
{
day:=1; //первый день посчитан
repeat //начинаем считать следующие
day := day +1; //увеличиваем номер дня
day_dist:= day_dist + 200; //увеличиваем дневную дистанцию
sum_dist:= sum_dist + day_dist; //увеличиваем общую дистанцию
until day = 15; //если настал 15 день перестаем считать
}
writeln('В 15 день пройдено ', day_dist,'метров.'); //вывод результатов
writeln('За 15 дней пройдено ', sum_dist,'метров.');
end.