4.
1.
1.1
1.2
1.3 -
2.
2.1
2.2
3.
4. .
5.
6.
7.
, .
1) .
2) ( ).
3) ( ).
4) ( ).
5) ( ).
6) ( ).
7) ( ).
1) ( ).
. .
.
.
.
2)
. .
<
3) - ( )
( )
4) ( )
. .
BASIC | Pascal |
INPUT ; X A$= IF X MOD 2<>0 THEN A$=+A$ PRINT , A$ | Var x: Integer; Str: String; Begin Write( ); ReadLn(x); If x Mod 2 <> 0 Then Str:=+Str; WriteLn( , Str); End. |
-
- . - , . :
- ;
- ;
- / ;
- .
2.
, - , . .1. , .
, . , , , . .2 - .
|
|
. , 1, , 2.
, , ( ) . . 3 - .
. , , , .
, , . . N , , N .
: . . - .4.
, , . , .
, . , .
. (. 5), (. 6).
, . . 7 .
1. ( 8 2004 .)
- (. . 8):
1) ;
2) ;
3) ;
4) .
. . 8 , , . .
: 3.
2. ( 6 2005 .)
- (. . 9) , :
1) , ;
2) , ;
3) , ;
4) , .
. , - . 9, - , . 2.
: 2.
3. ( 29 2005 ., 6 2006 .)
- (. .10)
1) 1;
2) 5;
3) 10;
4) 15.
. - (). , -, (. 1), .
|
|
1.
x<>y | x>y | |||
55<>75 | 55>75 , y:=y-x=75-55=20 | |||
55<>20 | 55>20 x:=x-y=55-20=35 | |||
35<>20 | 35>20 x:=x-y=35-20=15 | |||
15<>20 | 15>20 , y:=y-x=20-15=5 | |||
15<>5 | 15>5 x:=x-y=15-5=10 | |||
10<>5 | 10>5 x:=x-y=10-5=5 | |||
5<>5 ; |
, 5, 2.
: 2.
. , . , .
4. ( 9 2004 .)
x, y t ( , ):
x=5 y=7 t=x x=y MOD x y=t | x:=5; y:=7; t:=x; x:=y Mod x; y:=t; | x:=5 y:=7 t:=x x:=mod (x,y) y:=t |
1) x=2; y=5; t=5;
2) x=7; y=5; t=5;
3) x=2; y=2; t=2;
4) x=5; y=5; t=5.
. :
y | t | ||
x=5 | |||
y=7 | |||
t=x | |||
x=y MOD x | |||
y=t |
, 1.
: 1.
5. ( 7 2006 .)
a b ( , ):
a=42 b=14 a=a\b b=a*b a=b\a | a:=42; b:=14; a:=a Div b b:=a*b a:=b Div a | a:=42 b:=14 a:=Div (a,b) b:=a*b a:=Div (b,a) |
1) a=42; b=14;
2) a=1; b=42;
3) a=0; b=588;
4) a=14; b=42.
. :
a | b | |
a=42 | ||
b=14 | ||
a=a\b | ||
b=a*b | ||
a=b\a |
, 4.
: 4.