2) , , , .
3) , : , ,
4) , , :
5) :
,
(),
6) N :
N:=0
a:=; for k:=1 to length(a) do
if a[k]=u then N:=N+1;
write(N); 2
7) , ..,
8)
9)
10) :
11) , , ,
12) ,
13) : ,, , , ,
14) (7 9 ) 2004 : 1. . 2. . 3. . 4. .
15) - - :
..
..
..
16) ,
17) : , .
18) , ,
19) ,
|
|
|
20) , , 8 24 , , 2. ()
21) : , , .
22) :
23) :
,
,
,
24) :
< > <1> <2>
Basic if < > then < 1> else < 2> end if
Pascall if <> then < 1> else < 2>
25) , , .
26) :
27) : 1986
28) : , , , .
29) : , , .
30) :
31) , :
32) : , , .
33) . : 1) , 2), 3), 4).??????
34) ,
35) :, , .
36)
37) , (, , ..).
38) .
39) , , .
40)
|
|
|
41) : , .
42) - .
43) : .
44) 78965431267 : 1
45) : 2004
46) 3,5 : 1,44
47) : .
48) : Visual C++,Borland Delphi.
49) Paint: , , .
50) : .
51) , , , .
52) (): , ,, ,, .
53) 6 90 .
54) :
INPUT W$ S=0 FOR I=1 NEXT I TO LEN(W$)
If MID$(W,$,I,1)=a then S=S+1
PRINTS S
55) : , ,
- .
+
+
2004 +105
+
- , .
, .
-
1
2
3 ,
4
5
+ CDR
+EPS
,
+
+
+^-
+A v -
+ <=> -
+ => -
+
+
- , web-
+ ;
+;
+.
+
+
- , , , , , . +
:
+
+
+
+
, ,
+
:
+
+
+ -?
:
+ + +
IP- +
,
+
,
|
|
|
+
+
S
S=1
For N=1 To3
S=S*N
Next N
Print S
+6
, 4 , ... ()
+2
Paint:
+, , , , ,
, , ,
+
+
, , 1995
+
+ , +
-
+
:
+,
6 ... : +90
+ ctrl+shift+D
+ ctrl+I
+ - ctrl+E
+ -ctrl+J
a:=
b:=a[3:5]
c:=a[1]+b
a,b,c
+
( )
+15-2-5
+20-6-7
+30-10-11
+
+
+
. : , , :
+
: ... +
+, ,
s s:=t[3:7] t= :
+
, () (), l
+
+
+1
2
3
4
