Решение метрических задач по начертательной геометрии на ЭВМ. Воронков А.И - 40 стр.

UptoLike

outtextxy(10,60,'приводятся в частное положение относительно новых
плоскостей проекций. При');
outtextxy(10,70,'этом решение поставленных задач значительно упрощается,
если преобразование f');
outtextxy(10,80,'одной системы плоскостей проекций в другую представить как
композицию (произ-');
outtextxy(10,82,' _ ');
outtextxy(10,84,' _ _ ');
outtextxy(10,93,'ведение) двух преобразований f, f. При этом исходная и новая
системы коорди-');
outtextxy(10,103,'нат будут иметь общее начало. ');
outtextxy(10,105,' _ ');
outtextxy(10,114,' При первом преобразовании f оставим неизменной одну из
плоскостей проекций');
outtextxy(10,124,'исходной системы отнесения, а другую плоскость проекций
заменим на новую.');
outtextxy(10,134,'С линиец пересечения плоскостей проекций будем совмещать
всегда ось x новой');
outtextxy(10,136,' _ ');
outtextxy(10,138,' _ ');
outtextxy(10,147,'системы коордиyнат. При втором преобразовании f
заменяется оставшаяся плос-');
outtextxy(10,157,'кость проекций исходной системы отнесения. Здесь также
будем соблюдать сде-');
outtextxy(10,167,'ланные выше ограничения.');
ent(7);
if kod<>13 then
exit;
s:=s+1;
end;
procedure list2;
begin
setgraphmode(1);
setfillstyle(1,0);
bar(0,0,getmaxx,getmaxy);
setcolor(8);
setbkcolor(15);
nazv1;
setcolor(8);
setbkcolor(15);
ris1;
setcolor(8);
setbkcolor(15);
niz;
40
 outtextxy(10,60,'приводятся в частное положение относительно новых
плоскостей проекций. При');
 outtextxy(10,70,'этом решение поставленных задач значительно упрощается,
если преобразование f');
 outtextxy(10,80,'одной системы плоскостей проекций в другую представить как
композицию (произ-');
 outtextxy(10,82,'                  _                         ');
 outtextxy(10,84,'                _ _                          ');
 outtextxy(10,93,'ведение) двух преобразований f, f. При этом исходная и новая
системы коорди-');
 outtextxy(10,103,'нат будут иметь общее начало.                ');
 outtextxy(10,105,'               _                           ');
 outtextxy(10,114,' При первом преобразовании f оставим неизменной одну из
плоскостей проекций');
 outtextxy(10,124,'исходной системы отнесения, а другую плоскость проекций
заменим на новую.');
 outtextxy(10,134,'С линиец пересечения плоскостей проекций будем совмещать
всегда ось x новой');
 outtextxy(10,136,'                         _                 ');
 outtextxy(10,138,'                         _                 ');
 outtextxy(10,147,'системы коордиyнат. При втором преобразовании f
заменяется оставшаяся плос-');
 outtextxy(10,157,'кость проекций исходной системы отнесения. Здесь также
будем соблюдать сде-');
 outtextxy(10,167,'ланные выше ограничения.');
 ent(7);
 if kod<>13 then
         exit;
 s:=s+1;
end;

procedure list2;
begin
 setgraphmode(1);
 setfillstyle(1,0);
 bar(0,0,getmaxx,getmaxy);
 setcolor(8);
 setbkcolor(15);
 nazv1;
 setcolor(8);
 setbkcolor(15);
 ris1;
 setcolor(8);
 setbkcolor(15);
 niz;

40