Разделить натуральные числа по условию...
Дано некоторое количество чисел кратное трём
от 1 до 3N (N - натуральное число). Требуется поделить эти
числа на три множества. В каждом множестве должно быть
N натуральных чисел. Числа должны удовлетворять условию.
Если взять число из первого множества прибавить к нему
число из второго множества, то должно получится число из
третьего множества. Всего равенств должно быть N.
Должны быть использованы все числа и ни одно из них не должно
повторяться.
Пример N = 4 (то есть даны числа 1, 2, 3, ..., 12)
(четыре равенства, использованы все числа)
1 + 5 = 6
2 + 8 = 10
3 + 9 = 12
4 + 7 = 11
...
N = 5 (пять равенств, даны числа 1, 2, ... , 15)
1 + 6 = 7
2 + 9 = 11
3 + 12 = 15
4 + 10 = 14
5 + 8 = 13
программа решает задачу при N = 8
| QBasic/QuickBASIC |
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
| REM
REM 1 + 9 = 10
REM 2 + 11 = 13
REM 3 + 14 = 17
REM 4 + 18 = 22
REM 5 + 19 = 24
REM 6 + 15 = 21
REM 7 + 16 = 23
REM 8 + 12 = 20
REM
CLS
DATA 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
READ i1, i2, i3, i4, i5, i6, i7, i8, i9, i17
FOR i10 = 11 TO 20
FOR i11 = 11 TO 20
IF i11 = i10 THEN 200
FOR i12 = 11 TO 20
IF i12 = i10 OR i12 = i11 THEN 300
FOR i13 = 11 TO 20
IF i13 = i10 OR i13 = i11 OR i13 = i12 THEN 400
FOR i14 = 11 TO 20
IF i14 = i10 OR i14 = i11 OR i14 = i12 OR i14 = i13 THEN 500
FOR i15 = 11 TO 20
IF i15 = i10 OR i15 = i11 OR i15 = i12 OR i15 = i13 OR i15 = i14 THEN 600
FOR i16 = 11 TO 20
IF i16 = i10 OR i16 = i11 OR i16 = i12 OR i16 = i13 OR i16 = i14 OR i16 = i15 THEN 700
IF 45 + i10 + i11 + i12 + i13 + i14 + i15 + i16 <> 150 THEN 700
i18 = i2 + i10
i19 = i3 + i11
i20 = i4 + i12
i21 = i5 + i13
i22 = i6 + i14
i23 = i7 + i15
i24 = i8 + i16
IF i17 + i18 + i19 + i20 + i21 + i22 + i23 + i24 <> 150 THEN 700
IF i10 = i17 OR i10 = i18 OR i10 = i19 OR i10 = i20 OR i10 = i21 OR i10 = i22 OR i10 = i23 OR i10 = i24 THEN 700
IF i14 = i17 OR i14 = i18 OR i14 = i19 OR i14 = i20 OR i14 = i21 OR i14 = i22 OR i14 = i23 OR i14 = i24 THEN 700
IF i15 = i17 OR i15 = i18 OR i15 = i19 OR i15 = i20 OR i15 = i21 OR i15 = i22 OR i15 = i23 OR i15 = i24 THEN 700
IF i16 = i17 OR i16 = i18 OR i16 = i19 OR i16 = i20 OR i16 = i21 OR i16 = i22 OR i16 = i23 OR i16 = i24 THEN 700
IF i17 = i18 OR i17 = i19 OR i17 = i20 OR i17 = i21 OR i17 = i22 OR i17 = i23 OR i17 = i24 THEN 700
IF i18 = i19 OR i18 = i20 OR i18 = i21 OR i18 = i22 OR i18 = i23 OR i18 = i24 THEN 700
IF i19 = i20 OR i19 = i21 OR i19 = i22 OR i19 = i23 OR i19 = i24 THEN 700
IF i20 = i21 OR i20 = i22 OR i20 = i23 OR i20 = i24 THEN 700
IF i21 = i22 OR i21 = i23 OR i21 = i24 THEN 700
IF i22 = i23 OR i22 = i24 THEN 700
IF i23 = i24 THEN 700
IF i18 > 24 OR i19 > 24 OR i20 > 24 OR i21 > 24 OR i22 > 24 OR i23 > 24 OR i24 > 24 THEN 700
PRINT i1; i9; i17
PRINT i2; i10; i18
PRINT i3; i11; i19
PRINT i4; i12; i20
PRINT i5; i13; i21
PRINT i6; i14; i22
PRINT i7; i15; i23
PRINT i8; i16; i24
END
700 : NEXT i16
600 : NEXT i15
500 : NEXT i14
400 : NEXT i13
300 : NEXT i12
200 : NEXT i11
NEXT i10
END |
|
(
