Дамп всех задач

2017-05-22 13:29:43 +03:00
parent b970626fef
commit 93746b05d7
173 changed files with 2505 additions and 0 deletions
--- a/Pascal/mass/Program9.pas
+++ b/Pascal/mass/Program9.pas
@@ -0,0 +1,8 @@
+const N = 31; 
+var A: array[1..N] of integer; 
+    i, x, y: integer; 
+    s: real; 
+begin
+  for i:=1 to N do Random(40) - 20; 
+  
+end.