С Char в integer/real...

al-ge

Kак перейти с массива (char) в массив (например integer или real)? Чтобы потом можно было бы сортировать массив.
5 ответов

al-ge

Чтобы потом можно было бы сортировать массив.
Так и массив char можно сортировать точно так же и любым способом.


al-ge

char в integer
var a:char; x:integer;
begin
a:='2';
x:=ord(a)-48;   {x=2}
end.


al-ge

сортируете почти так же как обычный массив, только добавляете ord, ну вот как уже было сказано. не знаю каким способом вы сортируете, но в конце концов получается что-то типа
if ord(a[i]) > ord(a[i+1]) then obmen;
ну, вот что-то типа. в зависимости от способа сортировки. просто все символы имеют свой порядковый номер, который можно смотреть. и буквы идут в алфавитном порядке, т.е. ord('a') < ord('b'). вот.


al-ge

олько добавляете ord,
Зачем?
var a:array[1..100] of char;
      n,i,j:byte;
      x:char;
begin
.....................
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then
 begin
   x:=a[i];
   a[i]:=a[j];
   a[j]:=x;
  end;
Также можно сортировать строки, записи наверное еще что-то...


al-ge

ой, точно. я и забыла уже) давно не работала с символами) действительно, не надо.