O primeiro elemento do array é: 9 

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos criar um array de inteiros
    Dim valores As Integer() = {9, 5, 3, 2, 4, 8}

    ' agora vamos retornar o primeiro elemento do vetor
    Dim primeiro As Integer = valores(0)

    ' e mostramos o resultado
    Console.WriteLine("O primeiro elemento do array é: " & primeiro)

    Console.WriteLine(vbCrLf & vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub

End Module

procedure TForm1.Button1Click(Sender: TObject);
var
  arquivo: TextFile;
  linha: String;
begin
  // vamos fazer uma ligação entre a variável arquivo e o
  // arquivo que queremos ler
  AssignFile(arquivo, 'C:\arquivo de codigos\dados.txt');

  // vamos abrir o arquivo em  modo leitura
  Reset(arquivo);

  // vamos ler cada linha e adicioná-la a um Memo
  while not Eof(arquivo) do
  begin
    ReadLn(arquivo, linha);
    Memo1.Lines.Add(linha);
  end;

  // hora de fechar o arquivo
  CloseFile(arquivo);
end;

using System;

namespace Estudos {
  class Program {
    static void Main(string[] args) {
      // vamos obter a diferença em anos, meses ou dias entre
      // duas datas
      DateTime data_inicial = new DateTime(2008, 4, 10);  // 10/04/2008
      DateTime data_final = new DateTime(2008, 5, 15);  // 15/05/2008

      // obtém a diferença
      TimeSpan dif = data_final.Subtract(data_inicial);

      // exibe o resultado
      System.Console.WriteLine("Diferença em:\nAnos: " +
        (dif.Days / 365) + "\nMeses: " + (dif.Days / 30) +
        "\nDias: " + dif.Days);

      Console.WriteLine("\n\nPressione uma tecla para sair...");
      Console.ReadKey();
    }
  }
}

<?php
  // vamos declarar e construir uma matriz de três linhas
  // e três colunas
  $matriz = array(  
    array(3, 7, 9),
    array(2, 4, 1),
    array(5, 6, 8)
  );
  
  // guarda a soma dos elementos na diagonal principal
  $soma_diagonal = 0;
  
  // vamos mostrar a matriz da forma que ela
  // foi informada
  echo "<br>";
  // percorre as linhas
  for($i = 0; $i < count($matriz); $i++){ 
    // percorre as colunas
    for($j = 0; $j < count($matriz[0]); $j++){
      echo $matriz[$i][$j] . "   ";
    }
    // passa para a próxima linha da matriz
    echo "<br>";
  }
  
  // vamos calcular a soma dos elementos da diagonal   
  // principal
  for($i = 0; $i < count($matriz); $i++){
    for($j = 0; $j < count($matriz[0]); $j++){
      if($i == $j){
        $soma_diagonal = $soma_diagonal + $matriz[$i][$j];
      }
    }
  }
     
  // finalmente mostramos a soma da diagonal principal
  echo "<br>A soma dos elementos da diagonal principal é: " 
    . $soma_diagonal;
?>

3 7 9
2 4 1
5 6 8

A soma dos elementos da diagonal principal é: 15

programa {
  funcao inicio() {
    // um laço PARA que escreve uma frase 5 vezes
    para (inteiro i = 0; i < 5; i++) {
      escreva("Gosto de programar\n")
    }
  }
}

programa {
  funcao inicio() {
    // um laço PARA que conta de 1 até 10
    para (inteiro i = 1; i <= 10; i++) {
      escreva(i, "  ")
    }
  }
}

programa {
  funcao inicio() {
    // um laço PARA que conta de 10 até 0
    para (inteiro i = 10; i >= 1; i--) {
      escreva(i, "  ")
    }
  }
}