. , , . .
, () . (r) (true), (false). . , , .
, A or or or D , , true (). , , . . .
He . . , 0 .
.
, .
, (r) , (and) ; 0, 1.
, . .
. , :
;
.
, , , . , , , . , , .
|
|
, , , . , . : ( , , ), . . , .
. -, , . -, , , . , ( ) . , , () .
( inline-) , .
( inline-) , . , , , .
, , . , , , , . . , . , , , , .
|
|
. , .
, . , , . , .
:
;
;
.
, . , , . ,
for i:=1 to 10 do
begin
A[i]:= * * A[i];
end;
D:= * ;
for i:=1 to 10 do
begin
A[i]:= D * A[i];
end;
. * , 10 .
. , .
, . , - , ( , , , ).
- ( for, ). . .
, , . . , .
,
S:=10;
for i:=1 to N do A[i]:= i*S;
S:= 10;
:= S; i:=1;
while i <= 10 do
begin
A[i]:= ; := + 10; i:=i + 1;
end;
Pascal, ( S , ). N , N ( ). i, i .
, , , , . , , .
|
|
: .
:
for i:=l to N do
for j:=l to M do A[i,j]:= 0;
. N*M, ( , !) :
:= N*M:
for i:=l to do A[i]:= 0;
, . , N, N , . ,
for i:=l to 3 do A[i]:=i;
[1]:=1;
[2]:=2;
[3]:=3;