Comando Keypressed

[Visitante: paitedo]

Prezados programadores:

Ao utilizar o código abaixo, aparece um 'B' no início da linha onde vou digitar uma palavra.

Alguém saberia uma solução??

Grato!!

tpal:=1;
writeln('Digite a palavra a ser reconhecida e a tecla F8 ao terminar:');
writeln;
repeat
pal[tpal]:=readkey;
write(pal[tpal]);
tpal:=tpal+1;
until keypressed;
tpal:=tpal-2;

[kelson.23]

Olá amigo eu testei o seu código aqui e não aparece nenhum 'B'. Eu não entendi direito o q você quer fazer, da pra explicar melhor?

abraço