Erro de sintaxe? (resolvido)

[{Nando}]

Program Looping_2B;

Uses Crt;
Var
  A, B, R : Integer;
  RESP : String;

Begin
  RESP := 'sim';
  Repeat
  ClrScr;
  Write('Entre um valor para A: '); Readln(A);
  Write('Entre um valor para B: '); Readln(B);
  Writeln;
  R := A + B;
  Writeln('O resultado corresponde a: ',R);
  Write('Deseja continuar? sim/não: '); Readln(RESP);
  Writeln;
  Until (RESP <> 'sim') and (RESP) <> 'SIM');
End.

Quando eu tento compilar retorna os sguintes erros:

Compiling loop_2B.pas

loop_2B.pas(19,25) Error: Operation "and" not supported for types "Boolean" and "ShortString"

loop_2B.pas(19,44) Fatal: Syntax error, ";" expected but ")" found

Fatal: Compilation aborted

Como pode "and" não ser suportado por tipos boolean?

E esse ";" esperado mas encontrado ")"?

Editado Abril 29, 2008 por {Nando}

[raphael_suporte]

Program Looping_2B;

Uses Crt;
Var
  A, B, R : Integer;
  RESP : String;

Begin
  RESP := 'sim';
  Repeat
  ClrScr;
  Write('Entre um valor para A: '); Readln(A);
  Write('Entre um valor para B: '); Readln(B);
  Writeln;
  R := A + B;
  Writeln('O resultado corresponde a: ',R);
  Write('Deseja continuar? sim/não: '); Readln(RESP);
  Writeln;
  Until (RESP <> 'sim') and (RESP) <> 'SIM');
End.

Quando eu tento compilar retorna os sguintes erros:

Compiling loop_2B.pas

loop_2B.pas(19,25) Error: Operation "and" not supported for types "Boolean" and "ShortString"

loop_2B.pas(19,44) Fatal: Syntax error, ";" expected but ")" found

Fatal: Compilation aborted

Como pode "and" não ser suportado por tipos boolean?

E esse ";" esperado mas encontrado ")"?

talvez o erro todo seja na segunda parte do and você fechou o parênteses

Until (RESP <> 'sim') and (RESP) <> 'SIM');

talvez seja só isso, e eu tb aconselho você coloque tudo dentro de um parênteses a mais

Until ((RESP <> 'sim') and (RESP <> 'SIM'));

[{Nando}]

O erro era exatamente na segunda parte do "and" onde eu havia fechado o parênteses. Foi só retirar ele que compilou sem problemas.

Obrigado.