Delphi/Kylix, Estrutura de Repetição


http://informaticode.blogspot.com.br/search/label/Delphi



Em qualquer aplicação profissional (as vezes em aplicações comuns também) é preciso de usar repetições, por isso esse post é dedicado a estrutura de repetição no Delphi e no Kylix.
 
O código abaixo é para que o programa repita de 1 a 10 uma mensagem informando o número de vezes repetidos.
var
contador: integer
//Declare uma variavel para contar quantas vezes repetir
begin
 contador:=0;
  //De um valor inicial para a contagem
 repeat //Inicie a repetição.
contador:= contador+1;  //Informe que a cada vez que for repetir será somado mais um
 showmessage(IntToStr(contador));//Mensagem mostrando a contagem de repetição (a variável e convertida)
 until(contador=10);  //Informe o total de vezes a ser repetido
end;

Simples, né?
Deixe abaixo seu comentário, crítica, sugestão etc.

HOT NA SEMANA

C, Ordenar um Vetor em Ordem Crescente

CSS, Efeito clarear e escurecer em CSS

C, Programa Números em Ordem Crescente

Omegle Saiu do Ar







© Copyright 2017 - INFORMATICODE, todos os direitos reservados.