/* p107

Language Turbo C 2.0
Extern functions */
#include <conio.h>
#include <stdio.h>
int a = 7;
/* Functions declaration */
d (); e ();
g (int, int);
j (int *, int *);
m (int a [], int);
s (int a [3] [3], int b [3] [3], int c [3] [3]);
main ()
{
int a = 10;
int b;
int p [10] = {1, 3, -5, 7, 9, 0, 22, 4, 6, 8};
int v [3] [3] = {0, 1, 2, 3, 4, 5, 6, 7, 8};
int w [3] [3] = {1, 2, 3, 4, 5, 6, 7, 8, 9};
int x [3] [3];
printf ("107.38. (1) a = %i ", a);
a++;
{
int a = 200;
printf ("(2) a = %i ", a);
a++;
}
printf ("(3) a = %i ", a++);
d ();
printf ("(4) a = %i ", a++);
e ();
printf ("(5) a = %i ", a++);
e ();
printf ("(6) a = %i.\n", a++);
a = 5;
b = 10;
printf ("108.39. At first a = %i, b = %i.\n", a, b);
g (a, b);
printf ("Now a = %i, b = %i.\n", a, b);
printf ("Nothing changed.\n");
j (&a, &b);
printf ("Now a = %i, b = %i.\n", a, b);
printf ("Values exchanged.\n");
printf ("109.40. Before sorting: ");
for (a = 0; a < 10; a++) printf ("%i ", p [a]);
m (p, 10);
printf ("\nAfter sorting: ");
for (a = 0; a < 10; a++) printf ("%i ", p [a]);
s (v, w, x);
printf ("\n110.41. Array x:\n");
for (a = 0; a < 3; a++)
printf ("%i %i %i\n", x [a] [0], x [a] [1], x [a] [2]);
getch ();
printf ("\n");
}
d ()
{
int a = 77;
printf ("(7) a = %i ", a);
a++;
}
e ()
{
printf ("(8) a = %i ", a);
a++;
}
g (int a, int b)
{
int c;
c = a; a = b; b = c;
}
j (int *a, int *b)
{
int c;
c = *a; *a = *b; *b = c;
}
m (int a [], int d)
{
int g, h, i;
for (g = 0; g < d - 1; g++)
for (h = 0; h < d - g - 1; h++)
if (a [h] > a [h + 1])
{
i = a [h];
a [h] = a [h + 1];
a [h + 1] = i;
}
}
s (int a [3] [3], int b [3] [3], int c [3] [3])
{
int d, e, f;
for (d = 0; d < 3; d++)
for (e = 0; e < 3; e++)
{
c [d] [e] = 0;
for (f = 0; f < 3; f++)
c [d] [e] += a [d] [f] * b [f] [e];
}
}