Технологическая автоматизация

Методы цифровых технологий

Технические и организационные мероприятия, обеспечивающие безопасность работ в действующих ЭУ

write(' └──────────┘ └──────────┘ └──────────┘ └──────────┘ └──────────┘ └──────────┘');

textcolor (2);(1+ (podkl-1) *13,2);(' ┌────────',podkl,'─┐');i: =3 to 23 do(2);(2+ (podkl-1) *13, i);('│');(13+ (podkl-1) *13, i);('│');;(1+ (podkl-1) *13,24);(' └──────────┘');(0);(h,m,s,hund);: = s;_t: = 1;ex do(KeyPressed = true) then

Продолжение приложения 3

ch: = readkey;(ch = '1') then inc_t: = 1;(ch = '2') then inc_t: = 5;(ch = '3') then inc_t: = 10;(ch = '4') then inc_t: = 20;(ch = '5') then inc_t: = 30;(ch = '0') then inc_t: = 60;(ch = #13) then ex: = false;;(h,m,s,hund);(s = sp+1) then(s = 59) then sp: = 0 else sp: = s;: = sm + inc_t;(sm >= 60) then: = mm + 1;: = sm - 60;: = podkl + 1;(podkl = 7) then podkl: = 1;(2);(1+ (podkl-1) *13,2);(' ┌────────',podkl,'─┐');i: =3 to 23 do(2);(2+ (podkl-1) *13, i);('│');(13+ (podkl-1) *13, i);('│');;(1+ (podkl-1) *13,24);(' └──────────┘');(podkl = 1) then podkl1: = 6 else podkl1: = podkl-1;(0);(1+ (podkl1-1) *13,2);(' ┌────────',podkl1,'─┐');i: =3 to 23 do(2+ (podkl1-1) *13, i);('│');(13+ (podkl1-1) *13, i);

Продолжение приложения 3

write ('│');;(1+ (podkl1-1) *13,24);(' └──────────┘');;(mm = 60) then

begin: = hm + 1;: = 0;;: =hm*60+mm+sm/60;i: =1 to 6 do_t : =time*s_nas ;;(1);(36,1);(LZero (hm),': ',LZero (mm),': ',LZero (sm));(1);: = (obem_t /obem_all) *100;(tmp > 100) then tmp: =100;(off =1) then ris_nap (tmp);(tmp >= 90) then off : =0;: =0;i: =1 to 6 do j: =j+off ;(j = 0) then(28,10);_Okno (12,8,70,11,6,15,false,2);(13,9,69,10,6);(15); (' Все резервуары наполнены ');

write (' Для выхода нажмите любую клавишу');

repeat until KeyPressed;: =false;;;;_kurs;

clrscr;. Перейти на страницу: 1 2 3 4 5 

Другие статьи по теме:

Цифровизация участка первичной сети связи Развитие науки и техники способствовало развитию телекоммуникационных сетей как всего мира, так и Украины. Передача мультимедийного трафика на первичной сети связи Украины осуществляется ...

Механизмы фотоаппарата В современном мире фотография является средством информирования людей о событиях в мире, средством научных исследований, видом искусства. Изобретение фотографии относится к 1839году. Че ...

Источник питания с микроконтроллером Микроконтроллеры используются во всех сферах жизнедеятельности человека, устройствах, которые окружают его. Простота подключения и большие функциональные возможности делает его при ...