. | | | !  
 



, , . Char.

- , , . 0 255.

ASCII . 0 127 ASCII, 0 31 . IBM- . 128 255 , , . , , .

ASCII:

      !   "   #   $
  %   &   '   (   )
  *   +   ,     .
  /                
                   
      :   ;   <   =
  >   ?   @   A   B
  C   D   E   F   G
  H   I   J   K   L
  M   N   O   P   Q
  R   S   T   U   V
  W   X   Y   Z   [
  \   ]   ^   _   `
  a   b   c   d   e
  f   g   H   i   j
  k   l   M   n   o
  p   q   R   s   t
  u   v   W   x   y
  z   {   |   }   ~
          
         
         
         
         
         
           
         
         
           
         
         
         
         
         
         
         
         
         
         
         
         
         
         
         
           

. : , ASCII .

Char : ch:='*'; a:='3'; letter:='G'. Chr(x) ( ). h Ord(ch).

1

:

… YZ.

: , , 2- , 3- , . ʳ . , :

Program Example;

Var i,j:Char;

Begin

For i:='A' to 'Z' do

Begin

For j:='A' to i do Write (j);

Writeln

End

End.

2

, , . , Enter.

, .. , , :

Program Example;

Var ch:Char;

k:Integer;

Begin

Read (ch);

k:=0;

While ch<>'.' do

Begin

If (ch>='0') and (ch<='9') then k:=k+1;

Read(ch);

End;

Writeln ('ʳ : ',k);

End.

1. ?

2. ?

3. ASCII?

4. ?

1) 2 , , .

2) , .

3) ASCII 32 255.

4) , : ?

5) * , n : d1d2dn (d1, d2 .. , + , n>1). .





: 2014-11-04; : 2386 | | !



studopedia.org - . - 2014-2024 . , . (0.009 )...