1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

TPW - Error 3: Unknown Identifier

Discussão em 'Programação' iniciada por S7sRuss, 12 de Maio de 2007. (Respostas: 1; Visualizações: 1437)

  1. S7sRuss

    S7sRuss What is folding?

    Olá pessoal.
    Estive a escrever o programa em baixo no Turbo Pascal for Windows 1.5 (TPW 1.5)
    e quando fiz compilar deu o erro Error 3: Unknown Identifier na função delay(1).

    Como posso resolver o problema?

    program cronometro;
    uses wincrt;
    var mil,seg,min:integer;
    begin
    mil:=0;
    seg:=0;
    min:=0;
    read;
    while(min<60) do
    begin
    delay(1); {erro!}
    mil:=mil+1;
    if(mil=60) then
    begin
    seg:=seg+1;
    mil:=0;
    end;
    if (seg=60) then
    begin
    min:=min+1;
    seg:=0;
    end;
    gotoxy(3,5);
    write(min,':',seg,':',mil);
    end;
    end.
     
    Última edição: 12 de Maio de 2007
  2. S7sRuss

    S7sRuss What is folding?

    Já resolvi o problema. Como o TPW 1.5 não tinha nenhuma biblioteca com a função delay então usei o programa PZIM para compilar o código.
    Com o PZIM, a única alteração a fazer no código é retirar a linha uses WinCrt;
     

Partilhar esta Página