ВУЗ:
Составители:
Рубрика:
gotoxy(4,13);
write
(' АВТОРЫ: МАКАРОВ А.А., МАКАРОВА Н.А.
'); repeat
key:=readkey; if
key=chr(27) then
begin
break;
end;
until false;
End;
Procedure Chapka;
Begin
new_win(l,1,80,25,1);
Windl(2,20,78,25,3,0,'y',l);
GOTOXY(3,2);
write
(' Для ввода данных установите курсор на соответ
-
ствующую позицию с помощью');
GOTOXY(3,3);
write
('стрелок "вверх" и "вниз" и нажмите
ENTER
. Для
того чтобы исправить оши
-");
GOTOXY(3,4);
write
('бочно введенное данное, подведите курсор и повто
-
рите ввод.');
GOTOXY(3,5);
write
(' Для окончания ввода нажмите
ESC. ');
windl(2,2,78,18,3,0,'
у
',1); textcolor(O); gotoxy(3,2);
write(
' 1. ЗНАЧЕНИЕ ВЫСОТЫ СТЕНКИ БАЛКИ В СМ
');
gotoxy(3,3);
write(
'————————————————————————————— ————————');
gotoxy(3,4); write(
' 2. ЗНАЧЕНИЕ ТОЛЩИНЫ СТЕНКИ БАЛКИ В СМ
');
gotoxy(3,5);
write(
Страницы
- « первая
- ‹ предыдущая
- …
- 123
- 124
- 125
- 126
- 127
- …
- следующая ›
- последняя »
