Как в паскале разделить слово на раздельные буквы что бы потом эти буквы использовать. Короче я хочу сделать программу чтобы английские буквы заменялись на цифры. Например слово cafe- 3 1 6 5
Для доступа к символам строки используются индексы в квадратных скобках, начиная с 1. Например, если str := 'string'; то str[1] = 's', str[2] = 't' и так далее.
Krab Bark
Искусственный Интеллект
(284081)
Кублен, хм, да... Я проверял на cafe, получилось 3165, как в вопросе.
Дело в том, что английских букв, и то если считать только строчные, 26 штук, а цифр лишь только 10. Тогда можно преобразовывать буквы не в цифры, а в числа
var s,t,r:string; i:integer;
begin
readln(s); r:='';
for i:=1 to length(s) do if s[i]in['a'..'z'] then
begin str(ord(s[i])-96,t); r:=r+t+' ' end;
writeln(r);
end.
cafe превратится в 3 1 6 5, а string в 19 20 18 9 14 7