Задание 2. Составить программу, в результате работы которой будет нарисован дом....

0 голосов
47 просмотров

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


image

Информатика (14 баллов) | 47 просмотров
Дан 1 ответ
0 голосов

Ответ:

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(

я пытался

(46 баллов)