From c50e62b4e84534a1a603d4ea8cfd636c6ea62d32 Mon Sep 17 00:00:00 2001
From: RedGuy <me@redguy.ru>
Date: Tue, 20 Jun 2023 22:01:04 +0300
Subject: [PATCH] Add

---
 Program1.pas         | 13 +++++++++++++
 Монеткин.pas |  3 +++
 2 files changed, 16 insertions(+)
 create mode 100644 Program1.pas
 create mode 100644 Монеткин.pas

diff --git a/Program1.pas b/Program1.pas
new file mode 100644
index 0000000..043c546
--- /dev/null
+++ b/Program1.pas
@@ -0,0 +1,13 @@
+uses graphabc;
+
+var i:text;
+
+procedure menu();
+begin
+  setfontsize(30);
+  textout(WindowWidth() div 3,WindowHeight() div 7,'Русь');
+end;
+
+begin
+  menu;
+end.
\ No newline at end of file
diff --git a/Монеткин.pas b/Монеткин.pas
new file mode 100644
index 0000000..6f770d9
--- /dev/null
+++ b/Монеткин.pas
@@ -0,0 +1,3 @@
+begin
+
+end.
\ No newline at end of file