Разветвляющиеся вычислительные процессы

[Freia]

ПОМОГИТЕ ПОЖАЛУЙСТА(задача на паскале),буду рада любой помощи Написать оператор присваивания,в результате выполнения которого логическая переменная t получает значение true,если выполняется указанное условие, и значение false,иначе: цифра 5 входит в десятичную запись 3-х значного целого числа k
...А как примерно блок схему делать не подскажите?...

[Cannibal]

t:=((k div 100)=5)or((k mod 100 div 10)=5)or((k mod 10)=5);

[mzd52]

помогите пожалуйста составить блок схему для ;Z=max(lg(A),max(13-A),C)).и если можно программу на фортране.заранее спасибо