Так как цифры в шифре должны быть различны, то количество вариантов определяется по формуле A(n,k) = n!/(n-k)! = 9!/(9-3)! = 7*8*9 = 504
SetBrushHatch, принимает параметр - стиль штриховки. Подробности - в справке по ABCGraph, подраздел "Подпрограммы для работы с кистью". Это установка вида штриховки. А сама штриховка получится при обычной заливке. Или заливке ранее нарисованного контура, или при рисовании фигуры с заливкой. Этих команд много.
Уважаемые господа,
Настоящим сообщаем, что ввиду обстоятельств
непреодолимой силы (из-за сильного шторма), порт... временно закрыт и мы
не сможем поставить ваше судно под разгрузку.
Мы будем вам очень признательны, если вы задержите отгрузку
оборудования до нашего уведомления о прекращении форсмажорных
обстоятельств.
Надеемся, что эта кратковременная задержка не скажется отрицательно на графике поставок.
к переменной "c" прибавить один это сокращение от c=c+1