Сделать программу в small basic расчерчивающую графическое окно в клеточку

нельзя, ведь текст отсканирован а не скопирован!

на 1 дереве - 5 

на 2дереве - 7

2^3 = 8 цветов (скорее всего оттенки серого)

program fraza;

var x,y: string;

begin

writeln('введите название животного: ');

readln(x);

writeln('введите число');

readln(y);

writeln(x, " съест ", y, ' грибов.');

end.