Pascal qual o erro de sintaxe que não compila. Resolvido!

[ucastro]

md8.pas(36,11) Fatal: Syntax error, "DO" expected but "identifier O" found

Fatal: Compilation aborted

Recebo esta mensagem quando tento compilar um programa com o nome md8.pas.

É um programa sobre pesquisa sequencial de 10 nomes.

Segue o algoritmo:

program beagle;

uses crt;

var

Nome:array[1..10]of string;
I:integer;
Pesquisa:string;
Resp:string;
Acha:boolean;

begin

clrscr;

for I:=1 to 10 do
begin
writeln('Escreva nome',I:2,'o.: ');readln(Nome[I]);
end;

Resp:='Sim';

while Resp='Sim' do

begin

writeln;

write('Entre com o nome a ser pesquisado: ');readln(Pesquisa);

I:=1;

Acha:=false;

while I<=1O and Acha=false do

if Pesquisa=Nome[I] then
Acha:=True

else
I:=I+1;

if Acha=true then

Write(Pequisa,' foi localizado na posição ',I)

else

Write(Pesquisa,' Não foi localizado');

writeln;

write('Deseja continuar?');

write(Resp);

end;

end.

Mais uma pergunta ,tem um usuário visitante vendendo video-aulas 6 horas de pascal e 5 horas de Delphi além de outras linguagens de programação. Para aprender qual o melhor curso online a fazer em VBnet depois que pegar uma melhor noção de lógica de programação ou compensa comprar tipo essas video-aulas?

Porque agosto farei o curso técnico de informática no Senac e está programado Visual Basic e queria ir no curso já sabendo bastante.

Então por enquanto queria algo meio barato para ir aprendendo.

Editado Fevereiro 7, 2008 por ucastro

[Graymalkin]

Dê uma boa olhada nesta linha:

while I<=1O and Acha=false do

Não está escrito "10" (dez) e sim "1O" (um e mais uma letra "O").

Abraços,

Graymalkin

[ucastro]

Obrigado novamente!!

Só erro bobo!!