Компонентный Паскаль/Отбор данных: различия между версиями
Содержимое удалено Содержимое добавлено
Fantom78 (обсуждение | вклад) |
Fantom78 (обсуждение | вклад) |
||
Строка 83:
=== Вывод данных на экран ===
Поскольку у нас уже есть готовые данные для вывода на экран, необходимо придумать способ сделать это доступно для оператора.
Часть символов ("#" и " ") уже представлено по условию задачи, и они обозначают "есть сигнал" и "нет сигнала" соответственно. Но у нас появился ещё один сигнал, значение которого равно "600". И его надо как-то тоже обозначать. Поскольку он превышает нормальный уровень нужно визуально указать на этот факт. Очень удобно будет использовать символ "^". Ниже примерный вид процедуры, который мог бы это сделать:
<source lang="oberon2">
PROCEDURE OutSig;
CONST
p = " "; (* пауза в передаче сигнала *)
s = "#"; (* полезный сигнал *)
m = "^"; (* молния? *)
BEGIN
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
Log.String(m)
END;
Log.Ln; Log.String('[Конец приёма]');Log.Ln
END;
</source>
== Примечания ==
| |||