3
. Turbo Pascal.
. . ; ; , , ; , , .
1. . . : / . ., . ., . . : , 2010. 192 .
2. . . 1 2 / . . : , 2006. 134 .
3. .
-
1. , , .
1. ?
2. for?
3. for?
4. ?
5. while for ?
6. ?
7. for..to..do for..downto..do?
, .
ϳ .
, , .
, , , , , .
. , (), . , .
:
1) : ;
2) : 䳿, ;
3) : ;
4) : ( ) , ( ).
. if-goto, , . , : , .
|
|
(for)
. (), () , . . , - .
(for) . : for <>:= < 1> to < 2> do < 1>; for (), to (), do () - () ; - , , , , 1 2 - , .
ij . 1. , , 2, 1. ϳ 1 1 2 .. , 2, . , 1 2, .
- :
.
1. , .
2. .
3. 䳺 , .
4. ϳ do . , ! begin end.
. s = 0. ϳ for i:= 4 to 6 do begin s:=s+i; z:=2*i end; s 0+4+5+6=15, z =12.
. .
for: for <>:= < 1> downto < 2> do < 1>;
䳺 , 1 (downto - ).
. s= 0. ϳ for i:= 6 do downto 4 begin s:=s+i z:=2*i end; s 0+6+5+4=15, z = 8.