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

UptoLike

ВУЗ: 

ОГУ | Оренбург

Составители: 

Рубрика: 

outtextxy(10,193,' - - = = ');
outtextxy(10,200,'При этом отрезки B C , B C конгруэнтны, и последний
располагаем перпенди-');
outtextxy(10,203,' 1 1 1 1 ');
outtextxy(10,208,' = = = ');
outtextxy(10,215,'кулярно линиям связи. Поэтому фронтальная проекция A B
C определяет нату-');
outtextxy(10,218,' 2 2 2 ');
outtextxy(10,228,'ральные размеры треугольника ABC.');
outtextxy(395,238,' { нажмите клавишу <enter> } ');
ent(5);
if kod<>13 then
exit;
ris2_34;
outtextxy(10,252,' = = ');
outtextxy(10,259,' Известными построениями находим фронтальную
проекцию O центра O искомой');
outtextxy(10,261,' 2 ');
outtextxy(10,266,' = ');
outtextxy(10,273,'окружности, по линиям связи находим его горизонтальную
проекцию O . Обрат-');
outtextxy(10,276,' 1 ');
outtextxy(10,281,' = - ');
outtextxy(10,285,' -1 -1 ');
outtextxy(10,289,'ными преобразованиями u , u находим проекции O , O
центра O описанной');
outtextxy(10,292,' 1 2 ');
outtextxy(10,302,'вокруг треугольника ABC окружности.');
ent(5);
if kod<>13 then
exit;
s:=s+1;
end;
procedure menu(var ukaz:integer);
var
s:array[1..4] of string;
begin
clrscr;
textcolor(5);
textbackground(7);
S[1]:=' Способ замены плоскостей. ';
S[2]:='Графическое решение основных задач.';
S[3]:=' ВЫХОД ';
62
 outtextxy(10,193,'         -- ==                               ');
 outtextxy(10,200,'При этом отрезки B C , B C конгруэнтны, и последний
располагаем перпенди-');
 outtextxy(10,203,'          11 11                               ');
 outtextxy(10,208,'                             ===              ');
 outtextxy(10,215,'кулярно линиям связи. Поэтому фронтальная проекция A B
C определяет нату-');
 outtextxy(10,218,'                             222             ');
 outtextxy(10,228,'ральные размеры треугольника ABC.');
 outtextxy(395,238,' { нажмите клавишу  } ');
 ent(5);
 if kod<>13 then
         exit;
 ris2_34;
 outtextxy(10,252,'                               =     =      ');
 outtextxy(10,259,' Известными построениями находим фронтальную
проекцию O центра O искомой');
 outtextxy(10,261,'                                2        ');
 outtextxy(10,266,'                                   =      ');
 outtextxy(10,273,'окружности, по линиям связи находим его горизонтальную
проекцию O . Обрат-');
 outtextxy(10,276,'                                    1    ');
 outtextxy(10,281,'            = -                           ');
 outtextxy(10,285,'             -1 -1                          ');
 outtextxy(10,289,'ными преобразованиями u , u находим проекции O , O
центра O описанной');
 outtextxy(10,292,'                            1 2            ');
 outtextxy(10,302,'вокруг треугольника ABC окружности.');
 ent(5);
 if kod<>13 then
         exit;

 s:=s+1;
end;

procedure menu(var ukaz:integer);
var
  s:array[1..4] of string;
begin
 clrscr;
 textcolor(5);
 textbackground(7);
 S[1]:=' Способ замены плоскостей. ';
 S[2]:='Графическое решение основных задач.';
 S[3]:='          ВЫХОД           ';

62

Страницы