Add Pascal learning files

2025-11-20 21:18:32 +02:00
parent 1ce193cc0d
commit 258f24570a
37 changed files with 587 additions and 0 deletions
--- a/PascalABCnet/while/While_task7.pas
+++ b/PascalABCnet/while/While_task7.pas
@@ -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.