Title / Description
Code program gwiazdy; uses crt,graph; const sciezka='c:\progra~1\tp\bgi'; var d,m:integer; procedure gwiazdka(a:integer); var b:integer; begin b:=round (a/2); linerel(a,0); linerel(-b,a); linerel(b,a); linerel(-a,0); linerel(-b,a); linerel(-b,-a); linerel(-a,0); linerel(b,-a); linerel(-b,-a); linerel(a,0); linerel(b,-a); linerel(b,a); end; begin d:=detect; initgraph(d,m,sciezka); setcolor(yellow); moveto(200,200); gwiazdka(20); moveto(400,400); gwiazdka(30); repeat until keypressed; closegraph; end.
Author
Highlight as C C++ CSS Clojure Delphi ERb Groovy (beta) HAML HTML JSON Java JavaScript PHP Plain text Python Ruby SQL XML YAML diff code
1.1.2
1.1.2