12
: Pascal
:
1. Pascal, ;
2. Pascal.
DIV MOD
div.
z:= x div y
x - , y ()
y - , x ()
z - ( )
, z:= 55 div 6 z = 9.
- mod.
z:= x mod y
x - , y ()
y - , x ()
z -
, z:= 55 mod 6 z=1.
, , v - , m:
if v mod m = 0 then
, , 40 4, mod :
if 40 mod 4 = 0 then
.
, , . , . .
Pascal :
For,
While,
Repeat,
)
, . , , .
for < >:=<> to/downto <> do <>;
- integer
, -
to ,
downto ,
- , ,
1. .
program7_.
:
)
:
,
1. :
2.
3.
4. .
, ?
<>
< >
. .
|
|
2. , 0 1 0,2.
program8_.
)
< >
<>
. , (false), . , . :
Repeat < 1 >;
< 2 >;
< n >;
until < >
3. , .
:
;
k ;
;
s ;
(s) = 0, () . , , , .
-