Question

Написать программу, которая рисует 3 квадрата (pascal abc. Помогите пожалуйста решить задачу

Answer 1

Ответ:

Все что нужно в в фото и тексте

Объяснение:

Код:

program force;

uses drawman;

procedure cube;

begin

pendown;

onVector (0,3);

onVector (3,0);

onVector (0,-3);

onVector (-3,0);

penup;

end;

begin

field (9,9);

cube;

onVector (0,4);

cube;

onVector (4,0);

cube;

topoint (0,0);

end.

Фото