1 files changed, 29 insertions, 0 deletions
diff --git a/Занимательное программирование/3/3_random/graphics_3d.lpr b/Занимательное программирование/3/3_random/graphics_3d.lpr
new file mode 100644
index 0000000..3778580
--- /dev/null
+++ b/Занимательное программирование/3/3_random/graphics_3d.lpr
@@ -0,0 +1,29 @@
+program graphics_3d;
+
+{$mode objfpc}{$H+}
+
+uses
+  {$IFDEF UNIX}
+  cthreads,
+  {$ENDIF}
+  {$IFDEF HASAMIGA}
+  athreads,
+  {$ENDIF}
+  Interfaces, // this includes the LCL widgetset
+  Forms, Octahedron, geometry
+  { you can add units after this };
+
+{$R *.res}
+
+begin
+  Randomize;
+  RequireDerivedFormResource:=True;
+  Application.Scaled:=True;
+  {$PUSH}{$WARN 5044 OFF}
+  Application.MainFormOnTaskbar:=True;
+  {$POP}
+  Application.Initialize;
+  Application.CreateForm(TForm1, Form1);
+  Application.Run;
+end.
+