Delphi

4. Задача об инфекции стригущего лишая Ван Тассел Д. Стиль, разработка, эффективность, отладка и испытание программ. – М.: Мир, 1981)
Промоделировать процесс распространения инфекции – стригущего лишая по участку кожи размером п х п (п – нечетное) клеток. Предполагается, что исходной зараженной клеткой кожи является центральная. В каждый интервал времени пораженная инфекцией клетка может с вероятностью 0,5 заразить любую из соседних здоровых клеток. По прошествии 6 единиц времени зараженная клетка становится невосприимчивой к инфекции. Возникший иммунитет действует в течение последующих 4 единиц времени, а затем клетка оказывается здоровой.
В ходе моделирования описанного процесса необходимо выдавать текущее состояние исследуемого участка кожи в каждый интервал времени, отмечая зараженные, невосприимчивые к инфекции и здоровые клетки.