# vamos declarar e construir um vetor de 8 inteiros
valores = [0, 3, 0, 5, 7, 4, 0, 9]

Vetor na ordem original:

0   3   0   5   7   4   0   9   

Vetor com os zeros deslocados para o final:

3   5   7   4   9   0   0   0

# vamos declarar e construir um vetor de 8 inteiros
valores = [0, 3, 0, 5, 7, 4, 0, 9]   
	
# vamos mostrar o vetor na ordem original
print("Vetor na ordem original:\n")
for i in (0..valores.length - 1)
  printf("%d   ", valores[i])
end    
	
# vamos inicializar j como 0 para que ele aponte para
# o primeiro elemento do vetor
j = 0
    
# agora o laço for percorre todos os elementos do vetor,
# incrementanto a variável i e deixando o j em 0
for i in (0..valores.length - 1)
  # encontramos um valor que não é 0
  if(valores[i] != 0)
    # fazemos a troca entre os elementos nos índices
    # i e j
    temp = valores[i]
    valores[i] = valores[j]
    valores[j] = temp
    # e avançamos o j para o elemento seguinte
    j = j + 1
  end
end

# agora mostramos o resultado
print("\n\nVetor com os zeros deslocados para o final:\n")
for i in (0..valores.length - 1)
  printf("%d   ", valores[i])
end

private void button1_Click(object sender, EventArgs e){
  // vamos obter a quantidade de controles no formulário
  int quantControles = this.Controls.Count;

  // vamos exibir o resultado
  MessageBox.Show("O formulário contém " + quantControles + 
    " controles.");
}

private void button1_Click(object sender, EventArgs e){
  // vamos obter o Graphics do formulário
  Graphics g = this.CreateGraphics();

  // vamos desenhar uma linha na cor vermelha e com espessura
  // de dois pixels
  g.DrawLine(new Pen(Color.Red, 2), new Point(100, 150), 
    new Point(400, 450));

  // vamos liberar o objeto Graphics
  g.Dispose();
}

g.DrawLine(new Pen(Color.Red, 2), 100, 150, 400, 450);

private void button1_Click(object sender, EventArgs e){
  // vamos obter o Graphics do formulário
  Graphics g = this.CreateGraphics();

  // vamos criar várias coordenadas x e y
  Point[] coordenadas = {new Point(15,  20), new Point(15, 300),
     new Point(400,  300), new Point(400, 20), new Point(15,  20)};

  // vamos desenhar todas as linhas conectadas usando a cor azul e a 
  // espessura de um pixel
  g.DrawLines(new Pen(Color.Blue, 1), coordenadas);

  // vamos liberar o objeto Graphics
  g.Dispose();
}

procedure TForm3.Button1Click(Sender: TObject);
begin
  // vamos adicionar alguns itens ao ComboBox
  ComboBox1.Items.Add('Java');
  ComboBox1.Items.Add('C++');
  ComboBox1.Items.Add('Python');

  // vamos obter a quantidade de itens no ComboBox
  ShowMessage('O ComboBox possui '  + IntToStr(ComboBox1.Items.Count) +
    ' itens.');
end;