Bräuchte Rat bei Netlogo Aufgabe ...

to setup
  ca    ;; The screen will be cleared
  ask patches [set pcolor blue] ;; The patches of the screen will be set blue colour

  create-men he ;; here the breed population is beeing produced
  create-women she
  ask men [set heading 2 set color red setxy random-xcor random-ycor pd]
   ask women [set heading 2 set color blue setxy random-xcor random-ycor pd]
   set x 1
   set y 1
   set z 6
   
end

ask men [draw=square]
ask women [draw=rectangle]
set x x+1
set y y+1
set z z+1
tick
end

to draw-square
  repeat 4 [repeat x [fd 1 set pcolor red] rt 90
end
  
to draw-rectangle
    repeat 4 [repeat y [fd 1 set pcolor blue] rt 90 repeat z [fd 1 set pcolor blue] rt 90]   
end