Question

Все здравия! Помогите пожалуйста с заданием по Pascal(фото прикрепил ниже).
Заранее спасибо.

Answer 1

uses Robot;

begin

 task('cc3');

 for var i := 5 downto 0 do begin

   for var j := 0 to i do begin

     Paint;

     Right;

   end;

   Down;

 end;

end.