gitweb on Svarog
projekti pod git sistemom za održavanje verzija -- projects under the git version control systemdiff --git a/samples/pos-neg.mj b/samples/pos-neg.mj
--- a/samples/pos-neg.mj
+++ /dev/null
@@ -1,42 +0,0 @@
-program P
- final int size = 10;
- class Table {
- int[] pos;
- int[] neg;
- }
- Table val;
-{
- void main()
- int x, i;
- { //---------- Initialize val
- val = new Table;
- val.pos = new int[size];
- val.neg = new int[size];
- i = 0;
- while (i < size) {
- val.pos[i] = 0;
- val.neg[i] = 0;
- i++;
- }
- //---------- Read values
- read(x);
- while (x != 0) {
- if (0 <= x && x < size) {
- val.pos[x]++;
- } else if (-size < x && x < 0) {
- val.neg[-x]++;
- }
- read(x);
- }
-
- // output everything
- i = 0;
- while (i < size) {
- print(i,3);
- print(val.pos[i],5);
- print(val.neg[i],5);
- print(chr(10));
- i++;
- }
- }
-}