'{'MHL,"\b Идентификатор читателя:    \b "v30,
"\par  "v11," "v12,
if s(v40,v200)<>'' then'\par Верните, пожалуйста, книги: ' 

'\par '(if v40^f.1='*' then "\par "d40,v40^C.40,
'\par Вы взяли:  'd40,v40^D,
'\par вернуть должны были:   'd40,v40^E fi),
'\par 'if p(v200) then 
'\par 'v200^g,'\tab ',v200^a.9,'\tab 'v200^b.9,
'\tab ',v200^d*2,'\tab ДОЛГ','\tab 'v200^f" ",v200^c,"."v200^h,":"v200^i,".-"v200^j
fi fi
'\par ---------------------','\par }'