Информатика, 7 класс

uses robot; begin task('w12'); paint; right; while wallfromdown do begin paint; right; end; paint; down; while wallfromleft do begin paint; down; end; paint; left; while wallfromup do begin paint; left; end; paint; up; while wallfromright do begin paint; up; end; end.