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

UptoLike

procedure list21;
begin
setgraphmode(1);
setfillstyle(1,0);
bar(0,0,getmaxx,getmaxy);
setcolor(8);
nazv2;
setcolor(8);
niz;
outtextxy(10,50,' П л о с к о п а р а л л е л ь н ы м движением фигуры в
пространстве назы-');
outtextxy(10,60,'вается такое ее перемещение, при котором все точки фигуры
перемещаются в па-');
outtextxy(10,70,'раллельных плоскостях.');
outtextxy(10,90,' Теорема о плоскопараллельном перемещении относительно П
: при плоскопаралле-');
outtextxy(10,93,' 1 ');
outtextxy(10,103,'льном движении фигуры относительно горизонтальной
плоскости проекций фрон-');
outtextxy(10,113,'тальные проекции ее точек перемещаются по прямым,
перпендикулярным линиям');
outtextxy(10,123,'связи, а горизонтальная проекция фигуры остается
конгруэнтной самой себе. ');
outtextxy(10,143,' Теорема о плоскопараллельном перемещении относительно
П : при плоскопаралле-');
outtextxy(10,146,' 2 ');
outtextxy(10,156,'льном движении фигуры относительно фронтальной
плоскости проекций горизон-');
outtextxy(10,166,'тальные проекции ее точек перемещаются по прямым,
перпендикулярным линиям');
outtextxy(10,176,'связи, а фронтальная проекция фигуры остается
конгруэнтной самой себе. ');
ent(5);
if kod<>13 then
exit;
s:=s+1;
end;
procedure list22;
begin
setgraphmode(1);
setfillstyle(1,0);
bar(0,0,getmaxx,getmaxy);
57
procedure list21;
begin
 setgraphmode(1);
 setfillstyle(1,0);
 bar(0,0,getmaxx,getmaxy);
 setcolor(8);
 nazv2;
 setcolor(8);
 niz;

  outtextxy(10,50,' П л о с к о п а р а л л е л ь н ы м движением фигуры в
пространстве назы-');
  outtextxy(10,60,'вается такое ее перемещение, при котором все точки фигуры
перемещаются в па-');
  outtextxy(10,70,'раллельных плоскостях.');
  outtextxy(10,90,' Теорема о плоскопараллельном перемещении относительно П
: при плоскопаралле-');
  outtextxy(10,93,'                                    1          ');
  outtextxy(10,103,'льном движении фигуры относительно горизонтальной
плоскости проекций фрон-');
  outtextxy(10,113,'тальные проекции ее точек перемещаются по прямым,
перпендикулярным линиям');
  outtextxy(10,123,'связи, а горизонтальная проекция фигуры остается
конгруэнтной самой себе. ');
  outtextxy(10,143,' Теорема о плоскопараллельном перемещении относительно
П : при плоскопаралле-');
  outtextxy(10,146,'                                     2          ');
  outtextxy(10,156,'льном движении фигуры относительно фронтальной
плоскости проекций горизон-');
  outtextxy(10,166,'тальные проекции ее точек перемещаются по прямым,
перпендикулярным линиям');
  outtextxy(10,176,'связи, а фронтальная проекция фигуры остается
конгруэнтной самой себе. ');
  ent(5);
  if kod<>13 then
          exit;
  s:=s+1;
end;

procedure list22;
begin
 setgraphmode(1);
 setfillstyle(1,0);
 bar(0,0,getmaxx,getmaxy);

                                                                          57