. (), ()
1. 10 қ ә ұ ү?
ұ қ , 10 ң 10 қ ү , ғ 10 10 қ - . ғ ң:
= 10 9 8 ... 3 2 1 = 10!
n n n . , n ү - , ң . қ. M = {a1, a2,..., an} қғ . ң n ұ ә ң
қғ ә n ү ө ң:
Ұң, 0! = 1.
ү ң құ қ.
Program msal6;
uses WnCrt;
var
n, f: longnt;
{----------------------------------------------------------------------------------------}
Procedure Factoral(n: nteger; var f: longnt);
var
: nteger;
begn
f:= 1;
f n = 0 then f:= 1
else for := 1 to n do f:= f*
end;
{----------------------------------------------------------------------------------------}
begn
wrte('ң ң '); readln(n);
Factoral(n, f);
wrteln(' ', f, ' ә ұ ү')
end.
7. 2, 3, 4, 5, 9 қ ұ ң құғ
?
ң қ
ұ ұ қ. ұ .
қ, ұ ң қ ғ ң ңғ , қ ұ . ұ ? ң қғ 4 , ғ 4!-ғ ң. қ ң ғ ұ . қ, ұ ң ңғ . ғ ұ ғ ә ң 4!-ғ ң.
ә ң ұ 2*4! .
құ қғ қ. қ ө құң.
3
0, 1, 2, 3, 5 5- ө қ ң құғ ?
ғ, ң ғ ұғ ү.
|
|
, ? ұғ қ ә қғ .
қ қ ғ
, ғ қ ү ө, , ү, ә қ ғ .
ғ .
5 ң . Ү ғ ү ң . Ә A, B, C, D,..., X, Y, Z ң ә , ң a, b, c, d,..., x, y, z ә .
ң .
Ә қ :
ө ә B = {a1, a2, a3, a4} .
қғ, ң ә ң . ұ ғ ң .
қ.. ң ә ң , -ң .
ө ғ ғ , қ ң ғ қ .
ғ ң , ә ү ү ә ү .
: Z = {z1, z2, z3, z4 } B = {z2, z1, z3, z4} ә ү , ө ң ә ү.
ң
Қ ққ.
1-. 12 қ ә . ү 5 ә ү қ ө. қ қ ү ә құ ү.
қ ә 1- 12- :
1, 2, 3, 4, 5,..., 10, 11, 12.
ң 12 ң 5 ң қ. ұ ң ғ , ң , , ң ү: {1, 2, 3, 4, 5}; ғ {2, 1, 3, 4, 5} ң қғ.
, ә ұ : {, , , , ә}; ң ғ ә ғ қң ң : {, , , , ә}.
, 5 ұ ғ , ң ү.
ұ .
қ. k n ұ ң k ұ қ
|
|
, M = {1, 2, 3, 4} 4- 2- 12 ә ү ғ :
{1, 2} {1, 3} {1, 4} {2, 3} {2, 4} {3, 4}
{2, 1} {3, 1} {4, 1} {3, 2} {4, 2} {4, 3}
n k ғ ә = қ.
ғ, = = = = 12.
1- ғ қ. 12- 5- .
қ: = =
қ ә ғ :
= =
,
n k k ң ө ң қ :
,
, құ , ғ ү ұ құ ә құ ққ.
n k ..
Procedure pl(n, k: nteger; var r: longnt);
var
: nteger;
begn
r:= 1;
for := 1 to k do r:= r*(n - k + )
end;
Program msal1;
uses WnCrt;
var
n, k, r: longnt;
{----------------------------------------------------------------------------------------}
{ n k }
Procedure pl(n, k: nteger; var r: longnt);
var
: nteger;
begn
r:= 1;
for := 1 to k do r:= r*(n - k + )
end;
{----------------------------------------------------------------------------------------}
begn
wrte('қ ә ң '); readln(n);
wrte(' ү ө қ ң '); readln(k);
Pl(n, k, r);
wrteln('қ ұқң ғ ң: ', r)
end.
2. 0, 1, 2,..., 9 қ ө ң ә ү қ ғ ?
10- 4 қ ү ә ңғ қ қ. ғ 10 4 қ қ .
қ ң ұ 0 қ, , 0123, 0213 ә ... ұ ө ңғ . ұ 9 (0- қ) ғ ү ң ө, ғ 9 3- ғ ң, .
10 құғ ө ң ө ң.
Program msal2;
uses WnCrt;
var
n, k, a, a1: longnt;
{----------------------------------------------------------------------------------------}
Procedure placement(n, k: nteger; var r: longnt);
var
: nteger;
begn
r:= 1;
for := 1 to k do r:= r*(n - k + )
end;
{----------------------------------------------------------------------------------------}
begn
wrte('ң ө ң '); readln(n);
wrte(' - , '); readln(k);
placement(n, k, a);
placement(n - 1, k - 1, a1);
wrteln(' 0, 1, 2,.., 9 қ ғ ү ');
wrteln('ө ң ө: ', a - a1)
end.
1
қ, құң.
1. 40 ұ ө өғ, ң ә қ ү ә ң ?
|
|
2. 1, 2, 3, 4, 5 ғ қ қ ү ң құғ ?
ө
3. әң ә ұ ө ұ . қ ұ ө 3,5,7,9 ң . Қ ү қ ө қ?
ғ ө 5 ғ ү ә ғ ө қ , қ 10 ң ү (0, 1, 2,..., 9). қ ә ү ө .
ұ ө әң әқ қ , :
10 10 .
қ, құқ:
Program Problem3;
uses WnCrt;
Var
p: longnt;
{----------------------------------------------------------------------------------------}
Procedure placement(n, k: nteger; var r: longnt);
Var
: nteger;
begn
r:= 1;
for := 1 to k do r:= r*(n - k + )
End;
{----------------------------------------------------------------------------------------}
begn
placement(5, 4, p);
p:= 10*10*p;
wrteln(' ү ', p, ' ')
End.
4. n m қ ?
құ ү
n ң , ғ қң .
, ғ n-1 қ. ң m - 1 ң, ұғ қ .
n-1 қ ү ә ңғ қ қ. ә ғ .
ғ қң қғқ, қ -ғ ң .
Program Problem4;
uses WnCrt;
var
p: longnt;
m, n: nteger;
{----------------------------------------------------------------------------------------}
Procedure placement(n, k: nteger; var r: longnt);
var
: nteger;
begn
r:= 1;
for := 1 to k do r:= r*(n - k + )
end;
{----------------------------------------------------------------------------------------}
begn
wrte('қ ң '); readln(m);
wrte('ң ң '); readln(n);
placement(m - 1, n - 1, p);
wrteln(' ', m, ' ', n, ' ,');
wrteln(' ', p, '-ғ ң')
end.
5. 10 7 құғ. ң қң құ: ) , ) ә ө ?
, ұ ң ңғ ғ қ?
ңғ қң қ ғ ү ұ қ.
|
|
ұ қ, қ ң ү , ғ 7 ң ү.
1- 7- ө ғқ, {1, 2, 3, 4, 5, 6, 7} ү ү. , ң ң қ ғ. ө ұғ, 7 ғ.
ә ғ қ.
, 10- ғң ғ ң, 9 қ. 9 қ 7- ү 6- ң, қ қ. ә ғ .
ә, ң ә . ң ) ң ң.
ө ң
2
1. m n қ қ ?
2. 10 7 құғ. ң ң құ ) ) ү ә ?
ғ
1. қ әқ қ қ ү ң құғ ?
2. қ ғ қ қ ү ң құғ ?
3. 20 қ ғ ғ 2 , ң өғ, ғ ң . ұ қ ү ә ғ ?
4. өң ә 4 ә ұ қ ү ө құғ ?
5. 0, 1, 2,..., 9 ң ө ү ө ң қ құғ ?
6. 3, 5, 7, 11, 13, 17, 19, 23 қ ү ұ ө құғ ?
. N ( - 1 N)
: , N , K (N - , K - , ).
: .
N=4. . 1 N. (. 12.1):
. 12.1.
, "1", - "0":
12.1. | ||
, : {3}, {2}, {2, 3}, {1}, {1,3}, {1, 2}, {1, 2, 3}.
"0" "1". " ", 2n-1.
: ( ). - i . - d , ( ).
2^n-1 ( , ).
:
input " . ="; nfor i=1 to n input " "; a(i)nextfor i=1 to 2^n-1 rem= ========= for j=1 to n if d(j)=0 then x=j next rem= =========== for z=x to n d(z)=0 next z d(x)=1 rem= ==================== for j=1 to n if d(j) <> 0 then print a(j); next j printnext i:
|
|
:
: | N=3{1,2,3} |
: | 2,3 1,3 1,2 1,2,3 |
, 0 n , n- .
:
- " ": X. 1, 5, 10, 50 .
- M1, M2, M3, M4. X?
- N . , 1 N , X.
:
input "x="; xinput " "; nfor i = 1 to n input " "; a(i)nextfor i = 1 to (2^n - 1) rem== == for j = 1 to n if d(j) = 0 then k = j next j for z = k to n d(z) = 0 next z d(k) = 1 rem============================= s = 0 for j = 1 to n if d(j) <> 0 then s = s + a(j) next j rem======== ========== if s = x then for ii = 1 to n if d(ii) <> 0 then print " "; a(ii); next ii end if printnext i:
const nn=10;var a,d: array [1..nn] of integer; ii,i,n,x,j,z,st,k: integer;begin writeln (' ); readln (); writeln (' '); readln (n); for i:= 1 to n do begin writeln (' '); readln (a[i]); end; {= =} st:=1; for i:=1 to n do st:=st*2; {=================================} for i:= 1 to (st-1) do begin {= ===} for j:= 1 to n do if d[j]= 0 then k:= j; for z:= k to n do d[z]:=0; d[k]:=1; {=============================} s: = 0; for j: = 1 to n do if d[j] <> 0 then s:= s + a[j]; if s = x then {===== =========} for ii:= 1 to n do if d[ii] <> 0 then write (a[ii]); writeln; end;end.:
: | x=5n=31,2,3 |
: | 2,3 |
- - , "" .
- - .
.
() , , . , "" .
: , , , , - .
.
- ?
- n- .
- ( )?
- , ""/" ": (" 1"/" 2")?
.
- n. , n.
- - , ( n ). , ( , m ).