![]() |
| ! | |
|
|
, , . 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; : 2460 | | !
