, , ( ).
.
.
, .
. , , , , . , .
, , , () . 5.
A- ( ). 825 , - - ( ), , , .
( , ). , , ( ). , ( ).
8. :
5, 5, 2, 7, 8, 7, 8, 2, 2, 3.
. n , . k . , k, . k = 6, a7 = 2.
do () while (a1 + a2) do (a:= b + 3;c:= 2*b;) while (a*c b) .
do n:= n + 3; while (n < k) do while .
do (n:= n + 3; k:= k 1) while (n > k) .
|
|
: - . - . . , , .
- : $165 ( 16- ), 32.768 ( ), A (), 1 ( ), real (). #65 , A (65 A).
False , 1,5 . , 6 -.
ASCII, , . ,
ord(C) ord(A) = 2, chr(2) = #2 ( 2).
succ(1) = 2, chr(2) = #2.
#10 #8 , .
chr(ord(0) + 2) = 2, 2 ≠ #2.
not a or b not(a and not b) , . not a or b xor c not(a and not b) xor c .
xor not(a and not b) xor c , xor, a and not b xor not c.
.
, not a and xor b a = 0, b = 0, c = 0 0, 1.
not a xor c or b a = 1, b = 1, c = 1, 1, 0.
read : , . c . read(c) .
write , , . write. :4:2 , write(b:4:2) .
. - , . - , , pr(0.5, n, b) .
pr(r, n, 255) , - .
pr(12.7 + 1, 20, b) , - .
1. , 1:
procedure pr1(var a: byte; b: integer; c: real),
a byte.
.
a .
2. , 2:
procedure pr2(a: integer; var b: integer; c: real),
b , integer.
.
3. , 3:
procedure pr3(var a: integer; var b, c: real),
. a , b c .
.
, 1, 2, 3. b . 3 b . a , .
|
|
a f -. f 0, . , , .
read . . , . readln .
write(s1,,,s2,,,s3,,,s4) , . readln(s1,s2); readln(s3,s4); s2 s4 , ,,,.
read(s1,s2); readln(s3); read(s4); s2 s3 , ,,,.
readln(s1); read(s2); readln(s3, s4); s3 s4 , ,,,.
. , . char (a, b, c, d).
TRUE, n 8- ( ).
f(n) n () k . b n, k:= 0. ( b > 0) k 3 , 3 b, b and 7. b:= b shr 3, b 8, b.
k n, n, , . 186 (186 = 2728). f(n) TRUE.
, append.
Pos . , System. KeyPressed CRT.
Lst: text , Printer.
. fr 40 . a 6 * 50 * 20 = 6000 . , 6000 / 40 = 150 .
p t_rec. New(p[i]) 5 p[i]^. n n * sizeof(real) n . p . 5 * 5 + 6 * (7 + 8 + 9 + 6 + 10) = 265.
|
|
, , : function . , . : function f(a, b: array of real): boolean; function f;.
, (b1, b2, b3 ≤ 100) . N . , N, N, . 30.
:
, pr(a, k1, k2, d, c) , ,
. pr(a, k1, k2, d, c) a[i] i, a k2 . a[k2] .
, (b1, b2, b3 ≤ 100) . N . , N, N, . 30.
:
, ,
( .)
. , m . , m.
, (b1, b2, b3 ≤ 100) . N . , N, N, . 30.
:
.
, .
1.
2.
3.
. :
d ,
,
d/c ,
m ,
b ,
b/m ,
c m ,
d b ,
(d b)/(c m) .
:
. , . get_w(s2, i) s2 i- . s2[i] , s2[i] . s2[i] , s2[i]. i . s2, s1. s1 = tneeu?.
|
|
:
( .)
. g(s1, s2) , s1 s2. are. .
:
k
. k s1, s2. 4.
() .
- - .
.
- .
.
(TRUE, FALSE).