Реферат Курси за вибором з інформатики на старшій ступені загальної освіти

= TZ;

. X: = O [1,1] * PX + O [1,2] * PY + O [1,3] * PZ + O [1,4];. Y: = O [2,1] * PX + O [2,2] * PY + O [2,3] * PZ + O [2,4];. Z: = O [3,1] * PX + O [3 , 2] * PY + O [3,3] * PZ + O [3,4];;

Sr3d (P, S: Coord; Var R: Coord); Matrix = Array [1 .. 4,1 .. 4] Of Real; I, J: Byte;: Matrix; I: = 1 To 4 Do For J: = 1 To 4 Do If I = J Then O [I, J]: = 1O [I, J]: = 0;

[1,1]: = SX; [2,2]: = SY; [3,3]: = SZ;

. X: = O [1,1] * PX + O [1,2] * PY + O [1,3] * PZ + O [1,4];. Y: = O [2,1] * PX + O [2,2] * PY + O [2,3] * PZ + O [2,4];. Z: = O [3,1] * PX + O [3 , 2] * PY + O [3,3] * PZ + O [3,4];;

UX3d (P: Coord; Teta: Real; Var R: Coord); Matrix = Array [1 .. 4,1 .. 4] Of Real; I, J: Byte;: Matrix; I: = 1 To 4 Do For J: = 1 To 4 Do If I = J Then O [I, J]: = 1O [I, J]: = 0; [2,2]: = COS (Teta); [2,3]: =-SIN (Teta); [3,2]: = SIN (Teta); [3,3]: = COS (Teta);

. X: = O [1,1] * PX + O [1,2] * PY + O [1,3] * PZ + O [1,4];. Y: = O [2,1] * PX + O [2,2] * PY + O [2,3] * PZ + O [2,4];. Z: = O [3,1] * PX + O [3 , 2] * PY + O [3,3] * PZ + O [3,4];;

UY3d (P: Coord; Teta: Real; Var R: Coord); Matrix = Array [1 .. 4,1 .. 4] Of Real; I, J: Byte;: Matrix; I: = 1 To 4 Do For J: = 1 To 4 Do If I = J Then O [I, J]: = 1O [I, J]: = 0; [1,1]: = COS (Teta); [1,3]: =-SIN (Teta); [3,1]: = SIN (Teta); [3,3]: = COS (Teta);

. X: = O [1,1] * PX + O [1,2] * PY + O [1,3] * PZ + O [1,4];. Y: = O [2,1] * PX + O [2,2] * PY + O [2,3] * PZ + O [2,4];. Z: = O [3,1] * PX + O [3 , 2] * PY + O [3,3] * PZ + O [3,4];;

UZ3d (P: Coord; Teta: Real; Var R: Coord); Matrix = Array [1 .. 4,1 .. 4] Of Real; I, J: Byte;: Matrix; I: = 1 To 4 Do For J: = 1 To 4 Do If I = J Then O [I, J]: = 1O [I, J]: = 0; [1,1]: = COS (Teta); [1,2]: =-SIN (Teta); [2,1]: = SIN (Teta); [2,2]: = COS (Teta);

. X: = O [1,1] * PX + O [1,2] * PY + O [1,3] * PZ + O [1,4];. Y: = O [2,1] * PX + O [2,2] * PY + O [2,3] * PZ + O [2,4];. Z: = O [3,1] * PX + O [3 , 2] * PY + O [3,3] * PZ + O [3,4];;

Fig; [1]. X: = 10; A [1]. Y: = 10; A [1]. Z: = 10; [2]. X: = 10; A [ 2]. Y: = 10; A [2]. Z: = -10; [3]. X: = 10; A [3]. Y: = -10; A [3]. Z: = -10; [4]. X: = 10; A [4]. Y: = -10; A [4]. Z: = 10; [5]. X: = -10; A [5]. Y: = 10; A [5]. Z: = 10; [6]. X: = -10; A [6]. Y: = 10; A [6]. Z: = -10; [7]. X: = -10 ; A [7]. Y: = -10; A [7]. Z: = -10; [8]. X: = -10; A [8]. Y: = -10; A [8]. Z : = 10; [1]. B: = 1; B [1]. E: = 2; B [1]. C: = 10; [2]. B: = 2; B [2]. E: = 3; B [2]. C: = 10; [3]. B: = 3; B [3]. E: = 4; B [3]. C: = 10; [4]. B: = 4; B [4]. E: = 1; B [4]. C: = 10;

[5]. B: = 5; B [5]. E: = 6; B [5]. C: = 13; [6]. B: = 6; B [6] . E: = 7; B [6]. C: = 13; [7]. B: = 7; B [7]. E: = 8; B [7]. C: = 13; [8]. B : = 8; B [8]. E: = 5; B [8]. C: = 13;