Компонентный Паскаль/Отбор данных: различия между версиями

Содержимое удалено Содержимое добавлено
Строка 95:
Log.String('[Начало приёма]'); Log.Ln;
FOR i:=0 TO sig_max-1 DO
IF sig[i]:=0 THEN
Log.String(p)
ELSIF sig[i]:=500 THEN
Log.String(s)
ELSE
Строка 105:
END OutSig;
</source>
 
 
=== Общий вид программы ===