Reorganize

2026-03-02 19:15:17 +02:00
parent 9192716bfb
commit f235a35ebb
610 changed files with 1 additions and 0 deletions
@@ -0,0 +1,15 @@
+Program While_Task7;
+ const n=10;
+ var a:integer;
+  begin
+   While a<> n do
+   Begin
+   writeln('hello');
+   inc(a);
+   end;
+   a:=0;
+   repeat
+    writeln('hello');
+   inc(a);
+   until a=n;
+   end.