brazovanie massiva zakoncheno uspeshno! n n"); ("Dlya prodolzeniya nazat 'lubuyu klavishu ...");
} SandP ()
{S [4] [2]; rst1, rst2, rst3, rst4; pP = 0, pS = 0, p1, p2, pt1, pt2, diag; i, j; q;
{(); ("Ploshad 'i perimetr chetyrehugol'nika. n n"); ("Vnimanie! Tochki vvodit' po chasovoy! n"); ("Vvedite koordinaty 4 tochek. n n "); (i = 0; i <4; i + +)
{("x% d =", i +1); ("% f", & S [i] [0]); ("y% d =" ;, i +1); ("% f", & S [i] [1]); (" n");
} while (q! = 'y' && q! = 'Y');
} peres ()
{a, b, c, k, x, y; q;
{(); ("Opredelenie tochki perezecheniya pryamyh. n n"); ("Vvedite koeffcienty: n"); (" nKoefficient a ="); ( "% f", & a); (" nKoefficient b ="); ("% f", & b); (" nKoefficient c ="); ("% f" ;, & c); =-a/b; (k == -0.65)
{(" nPryamye parallel'ny! n");
}
{= (c +14 * b)/(0.65 * ba); = -0.65 * x +14; (" nTochka peresecheniya x =% .2 f y =% .2 f n" ;, x, y);
} (" nVyhod v glavnoe menu (Y/N)?"); = getch ();
} while (q! = 'y' && q! = 'Y');
} vyvod ()
{* out; i; ("MASSIV D n n"); ("# tX tY n"); (i = 0; i <15; i + +)
{("% d t% 2.2f t% 2.2f n", (i +1), D [i] [0], D [i] [1]) ;
} (" nDlya prodolzeniya nazat 'lubuju klavishu ... n"); (); (); ("MASSIV D1 n n"); ("# t # D tX tY n "); (i = 0; i
{("% d t% 2.2f t% 2.2f t% 2.2f n", (i +1), D1 [i] [2], D1 [i ] [0], D1 [i] [1]);
} (" nDlya prodolzeniya nazat 'lubuju klavishu ... n"); (); (); ("MASSIV D2 n n"); ("# t # D t # D1 tr tX tY n "); (i = 0; i
{(D2 [i] [4]! = 0)
}
} (" nDlya prodolzeniya nazat 'lubuju klavishu ... n"); = fopen ("rezpoints.txt", "w"); (out, "MASSIV D n n "); (out," # tX tY n "); (i = 0; i <15; i + +)
{(out, "% d t% 2.2f t% 2.2f n", (i +1), D [i] [0], D [i] [1 ]);
} (out, " n n"); (out, "MASSIV D1 n n"); (out, "# t # D tX tY n "); (i = 0; i
{(out, "% d t% 2.2f t% 2.2f t% 2.2f n", (i +1), D1 [i] [2], D1 [i] [0], D1 [i] [1]);
} (out, " n n"); (out, "MASSIV D2 n n"); (out, "# t # D t # D1 tr tX tY n "); (i = 0; i
