GRAPHABC Set Window Widthw Set Window Heighth Clear
Sign up to view full document!
SIGN UP
БИБЛИОТЕКА GRAPHABC Управление графическим окном Set. Window. Width(w); Set. Window. Height(h); Clear. Window(color);
БИБЛИОТЕКА GRAPHABC Работа с цветом Set. Pen. Color(c); Flood. Fill(x, y, c); с = rgb(r, g, b);
ПРОГРАММИРОВАНИЕ НА PASCAL uses Graph. ABC; var i, j: integer; s: string; begin read(s); for i: =0 to 3 do for j: =0 to 3 do begin rectangle(100+j*20, 10+i*20, 100+(j+1)*20, 10+(i+1)*20); if copy(s, 1, 1)=‘ 0' then floodfill(100+2+j*20, 10+2+i*20, cl. Black); delete(s, 1, 1); end; read end.
- Slides: 6