Zeta Security
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Zeta Security © 2011 - 2015 - Todos os direitos reservados


Cronômetro de 10 até 0

Zeta Security :: Programação Pascal/Delphi :: Tutoriais

Ir para baixo

Cronômetro de 10 até 0 Empty Cronômetro de 10 até 0

Mensagem por Allan Dom Nov 18, 2012 1:40 pm

Código:
program testes;
uses crt;
var seg:integer;
begin
   for seg := 10 downto 0 do begin
      clrscr;
      writeln(seg);
      delay(1000);
   end;
end.
Modifique o programa e estude junto!
cheers
Allan
Allan
Administrador
Administrador

Mensagens : 255
Data de inscrição : 06/07/2011
Idade : 26
Localização : Paraná

https://zetasecurity.forumeiros.com/

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

Zeta Security :: Programação Pascal/Delphi :: Tutoriais

 
Permissões neste sub-fórum
Não podes responder a tópicos