Question

Задание 2. Составить программу, в результате работы которой будет нарисован дом. Размножьте рисунок в любом направлении: по вертикали, по горизонтали, по диагонали. На рисунке показан примерный результат выполнения. Программу писать с помощью цикла For. Прислать скрин рисунка на фоне программы

Answer 1

Ответ:

uses GraphABC;

begin

 Window.SetSize(500,500);

 var (x,y):=(50,50);

 setpenwidth(3);

 for var i:=1 to 5 do

  begin

  setpencolor(RGB(random(255),random(255),random(

я пытался