6. 1= {1,2,3,...,20}, 2= {10,20,...,190,200} 3= {10,11,12,...40}.
Y = ( 2 3)\(( 1 2) ( 1 3)) Y 1, Y, 2. , . Y Y 1. .
7. 1= {2,4,6,8,10}, 2= {1,2,3,4,5} 3= {2,3,5,7,8}. Y = ( 2\ 3) ( 1\ 3). Y . .
8. , ( ) . , "" .
1.
type
= (, , , ,
, , , );
= record
: (, );
: 140..200
end;
= array [] of ;
(), .
2.
type
= record
: integer;
: 1..maxint
end;
= array[1..20] of ;
(a, b), a b.
3. z ( ) e > 0. e :
3.1 sh z = z + z 3 / 3! + z 5 / 5! + + z 2n+1 / (2 n + 1)! + ;
3.2 ch z = z + z 2 / 2! + z 4 / 4! + + z 2n / (2 n)! + ;
3.3 sin z = z z 3 / 3! + z 5 / 5! + (1)n z 2n+1 / (2 n + 1)! + ;
3.4 cos z = z z 2 / 2! + z 4 / 4! + (1)nz2n / (2 n)! + ;
3.5 ln (1 + z) = z z 2 / 2 + z 3 / 3 + (1)n-1zn / n + (| z | < 1);
3.6 arctg z = z z 3 /3 + z 5 /5 + (1)n z 2n+1 /(2 n + 1) + (| z | < 1).
4.
const
MaxN = 30;
type
= record
: boolean;
, : real;
end;
= array[1..MaxN] of ;
:
4.1 MaxNeg(C) ;
4.2 MaxDi(C) ;
5.
type
= record
x, y: real
end;
= record
r, fi: real { r ³ 0, -p < fi £ p }
end;
(d, p), d p, (p,d), .
6.
type
= 1..31;
= 1..12;
= 1..2000;
= record
: ;
: ;
:
end;
= (, , , , , , );
, ( ), :
6.1 (d), , d;
6.2 (d), d;
6.3 (d), , 1 1- d;
|
|
6.4 (d) , d (, 1 1‑ );
6.5 13(d), d, 13- .
1. . ( eoln eof ).
2. S . S 1|2 .
3. . 1|2 .
4. Name1 Name2. Name3, Name1 Name2 ( ).
5. Name1 Name2. Name1 Name2.
6. , . .
7. k (< 10) , k . 1|2 k .
8. k (< 10) , k . , k .
9. k . k ( 0). , .
10. k . 1|2 k ( 0). , .
11. . .
12. S . S.
13. . .
14. , , . [ ]1|2, ( 50). .
15. , , . . ( , ), ( ) , 1|2 ( 50).
16. . , .
17. . , (5 ). .
18. . (5 ), . .
19. . , , ( ).
20. . 1|2 ( , ).
21. N . , N ( , , ). N, .
|
|
22. C ( ) . , , 1|2 ( , ). , , . , .
23. N . N ( 1). , , . , .
24. N . N ( (5 ) 1). . , .
25. , , . .
26. , , ( ). 1|2 .
27. , , . , .
28. Name1 Name2. 1|2 Name1 Name2. Name2 Name1, Name1 .
29. NameT NameN. 1|2 NameT NameN. NameN NameT, NameT .
30. NameT. 60 , . : NameS, , NameR, .
31. Name1 Name2. NameT, , 30 : Name1, Name2. " | " ( 124). 1|2 .
32. A, B N. , f (x) = [ sin (x)]1|[ cos (x)]2|[ exp (x)]3 [ A, B ]
(B A)/ N. : x (10 , 3 ) f (x) (15 , 8 ). 10 .
33. NameT, . . - . Name1, Name2 Name3, .
34. , , . , -. . , .
|
|
35. . , , , ( ). [ ]1|[ ]2|[ ]3.
36. NameT. (" "" ") NameS, : <>< >. , , . [ ]1|[ , ]2.
37. N Name1, , . , N , 1|2 . . Name2.
38. N Name1, , . . , N , 1|2 , . . Name2.
39. K, 10 , . , , i - , , K [ i ]- ( K : i = 11 K [ 1 ] ..). , .
40. S1 , , 39. S1 . . , .
41. . , , ..
42. . , .
43. . , .
44. . , ( ).
45. . .
46. -.
47. . , .
48. . , .
49. / . , , .
50. , . , , , <>, , .
|
|
51. , . , , , , .
52. , , . , , <> <>.
53. getInt (Name, k) , k - Name ( 0). k - , 0. .
54. getLine (Name, k) , k - Name ( 0). k - , . .
55. IntFileSize (Name) , Name. , 1. .
56. TextSize (Name) , Name. , 1. .
57. InvertIntFile (Name), Name . , . .
58. SplitIntFile (Name0, k, Name1, Name2), k (>= 0) Name0 Name1, Name2 ( ). . Name0, Name1, Name2 k.
59. SplitText (Name0, k, Name1, Name2), k (>= 0) Name0 Name1, Name2 ( ). . Name0, Name1, Name2 k.
60. ConcatFile (NameA, NameB, NameAB), NameA NameB NameAB. BlockRead BlockWrite. Name1 Name2, Name1 Name3 Name2 Name3, Name12, Name13, Name23.
61. StringFileToText (Name)1 TextToStringFile (Name)2, [ ]1 2 Name 1 [ ]2 . , 1|2 Name1 Name2 1|2.
62. CodeText (Name, k), Name, , k - (0 < k < 11). , k = 3 "" "", "" "", "" "". "" , . k, 1 | 2 .
63. , . . .
64. , . , : .
65. , . . .
66. , n m (m > n), n×m. n×m . , . .
|
|
67. , , 3. .