Yin and yang: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 4: | Line 4: | ||
Generate and display the symbol generated for two different (small) sizes. |
Generate and display the symbol generated for two different (small) sizes. |
||
=={{header|D}}== |
|||
<lang d>import std.stdio, std.string, std.algorithm, std.array; |
<lang d>import std.stdio, std.string, std.algorithm, std.array; |
||
Line 94: | Line 94: | ||
=={{header|Delphi}}== |
=={{header|Delphi}}== |
||
<lang |
<lang d> |
||
procedure TForm1.ButtonCreateClick(Sender: TObject); |
procedure TForm1.ButtonCreateClick(Sender: TObject); |
||
begin |
begin |
||
Line 123: | Line 123: | ||
DrawArea.Ellipse(10 + 7 * (size div 16), 10 + 3 * (size div 16), 10 + 9 * (size div 16),10 + 5 * (size div 16)); |
DrawArea.Ellipse(10 + 7 * (size div 16), 10 + 3 * (size div 16), 10 + 9 * (size div 16),10 + 5 * (size div 16)); |
||
end; |
end; |
||
</lang> |
</lang> |
||
Output: |
|||
[[File:Yin&Yang.jpg]] |
|||
=={{header|J}}== |
=={{header|J}}== |