с контрольной задачей. По заданной логической функции X=(A+¬B)*C+¬A*B¬C построить логическую схему. Найти значение этой функции при А=1, В=0.

program z1;

var n,k:integer;

begin

k:=0;

write ('Введите натуральное число (n>9): ');

readln (n);

write ('Цифры натурального числа ',n);

while n>=10 do

begin

if n mod 10 < n div 10 mod 10 then k:=1;

n:=n div 10

end;

if k=1 then write (' НЕ расположены в порядке возрастания')

else write (' расположены в порядке возрастания')

end.

Объяснение:

Вводим число

Цикл с предусловием (условие число больше или равно 10)

Сравнение последней и предпоследней цифр числа, если последняя меньше, то k присваивается значение 1

n присваивается значение целочисленного деления на 10 (отбрасываем последнюю цифру числа)

Если k = 1, то цифры не расположены в порядке возрастания, иначе расположены

В общем случае, трассировка - один из отладки программ врукопашную: состояние программы контролируется на определённом отрезке времени её выполнения путём анализа значений переменных. трассировка в том или ином виде при отладке программ сложнее школьного дз практически неизбежна.
в простейшем случае, трассировка - вывод значений переменных на экран (например, в окно консоли) , либо расчёт их на бумажке для каждого шага.
в более продвинутом варианте используются точки останова, окно наблюдения, выполнение по шагам и, если есть, контекстный интерпретатор выражений.
есть также специальная "трассирующая консоль" - интерфейс вывода информации из программы в отладчик, если таковой присутствует.
почти любой современный отладчик показывает состояние програмm при её останове, что делает трассировку процессом легко доступным