Как преобразовать значения из символов в числа

Question

Как преобразовать буквы в числа. Скажем, A: = 5 и B: = 10. Когда вход AB, я хочу, чтобы результат был A + B (510) Я собираюсь сделать это со всеми символами в алфавите.

Answer 1

Это приведет вас к полному решению:

program ccn; 
const 
    a= 'A'; 
    z= 'Z'; 
type 
    domain= a..z; 
var 
    conv: array[ domain] of integer; 
    input: string; 
    i: integer; 

begin 
conv[ 'A'] := 5; 
conv[ 'B'] := 10; 
{ ...more} 

input := 'AB'; 
writeln('input:', input); 
write('output:'); 
for i := 1 to length(input) 
do 
    write(conv[ input[ i]]); 

writeln; 
end. 

Answer 2

я не паскаль специалист, но это должно работать:

получить порядковый номер каждой буквы с

n:=ord(s) 

, то вы можете вычесть Ord из ASCii «А» этого и добавьте 10, если вы хотите иметь 10 для A 11 для B и т. д .;

в случае, если вы хотите отобразить буквы на собственные цифры, которые вы могли бы использовать массив, который содержит вместо 5 на индекс, соответствующий порядковому posisition от «А», 10 в положении B и т.д.

затем применить

str() 

для каждого полученного в результате п

затем использовать

+ 

или

concat() 

поставить струны вместе