package arquivodecodigos;

public class Estudos{
  public static void main(String args[]){
    String octal = "10";
     
    // efetua a conversão de octal para
    // decimal
    int decimal = Integer.parseInt(octal, 8);
 
    // exibe o resultado
    System.out.println("O octal " + octal + " em decimal é " +
      decimal);
 
    System.exit(0);
  }
}

<?
  // vamos usar a função max() para obter o maior
  // entre três valores inteiros
  $maior = max(5, 12, 4);

  // vamos exibir o resultado
  echo "O maior valor é: " . $maior;
?>

<?
  // vamos usar a função max() para obter o elemento
  // com maior valor em uma matriz
  
  
  // vamos criar uma matriz com cinco elementos
  $valores = array(9, 3, 21, 49, 2);  

  // vamos obter o maior elemento
  $maior = max($valores);

  // vamos exibir o resultado
  echo "O maior valor é: " . $maior;
?>

O maior valor é: 49

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.Add('Cosseno de 0 = ' + FloatToStr(Cos(0)));
  Memo1.Lines.Add('Cosseno de 1 = ' + FloatToStr(Cos(1)));
  Memo1.Lines.Add('Cosseno de 2 = ' + FloatToStr(Cos(2)));
end;

#include <stdio.h>
#include <stdlib.h>
 
int main(int argc, char *argv[]){
  // vamos declarar e construir uma matriz de três linhas
  // e três colunas
  int linhas = 3, colunas = 3;
  int matriz[linhas][colunas];
  // guarda a soma dos elementos na diagonal principal
  int soma_diagonal = 0;
  int i, j;
	   
  // vamos ler os valores para os elementos da matriz
  for(i = 0; i < linhas; i++){ // linhas
    for(j = 0; j < colunas; j++){ // colunas
      printf("Informe o valor para a linha %d e coluna %d: " 
        , i, j);
      scanf("%d", &matriz[i][j]);       
    }       
  }
     
  // vamos mostrar a matriz da forma que ela
  // foi informada
  printf("\n");
  // percorre as linhas
  for(i = 0; i < linhas; i++){ 
    // percorre as colunas
    for(j = 0; j < colunas; j++){ 
      printf("%d    ", matriz[i][j]);
    }
    // passa para a próxima linha da matriz
    printf("\n");
  }
     
  // vamos calcular a soma dos elementos da diagonal   
  // principal
  for(i = 0; i < linhas; i++){
    for(j = 0; j < colunas; j++){
      if(i == j){
        soma_diagonal = soma_diagonal + matriz[i][j];
      }
    }
  }
     
  // finalmente mostramos a soma da diagonal principal
  printf("\nA soma dos elementos da diagonal principal é: %d" 
   , soma_diagonal);
  
  printf("\n\n");
  system("PAUSE");
  return 0;
}

Informe o valor para a linha 0 e coluna 0: 3
Informe o valor para a linha 0 e coluna 1: 7
Informe o valor para a linha 0 e coluna 2: 9
Informe o valor para a linha 1 e coluna 0: 2
Informe o valor para a linha 1 e coluna 1: 4
Informe o valor para a linha 1 e coluna 2: 1
Informe o valor para a linha 2 e coluna 0: 5
Informe o valor para a linha 2 e coluna 1: 6
Informe o valor para a linha 2 e coluna 2: 8

3    7    9
2    4    1
5    6    8

A soma dos elementos da diagonal principal é: 15

using System;

namespace Estudos {
  class Principal {
    static void Main(string[] args) {
      // os coeficientes
      double a, b, c;
      // as duas raizes, a imaginaria e o discriminante
      double raiz1, raiz2, imaginaria, discriminante;

      // vamos pedir para o usuário informar os valores dos coeficientes
      Console.Write("Valor do coeficiente a: ");
      a = Double.Parse(Console.ReadLine());
      Console.Write("Valor do coeficiente b: ");
      b = Double.Parse(Console.ReadLine());
      Console.Write("Valor do coeficiente c: ");
      c = Double.Parse(Console.ReadLine());

      // vamos calcular o discriminante
      discriminante = (b * b) - (4 * a * c);

      // a equação possui duas soluções reais?
      if (discriminante > 0) {
        raiz1 = (-b + Math.Sqrt(discriminante)) / (2 * a);
        raiz2 = (-b - Math.Sqrt(discriminante)) / (2 * a);
        Console.Write("Existem duas raizes: x1 = " + raiz1
          + " e x2 = " + raiz2);
      }
      // a equação possui uma única solução real?
      else if (discriminante == 0) {
        raiz1 = raiz2 = -b / (2 * a);
        Console.Write("Existem duas raizes iguais: x1 = "
          + raiz1 + " e x2 = " + raiz2);
      }
      // a equação não possui solução real?
      else if (discriminante < 0) {
        raiz1 = raiz2 = -b / (2 * a);
        imaginaria = Math.Sqrt(-discriminante) / (2 * a);
        Console.Write("Existem duas raízes complexas: x1 = " +
          raiz1 + " + " + imaginaria + " e x2 = " + raiz2
          + " - " + imaginaria);
      }
    
      Console.WriteLine("\nPressione uma tecla para sair...");
      Console.ReadKey();
    }
  }
}

Dim numero As Integer = 0

While numero <= 10
  Console.WriteLine(numero)
  numero += 1
End While

Dim numero As Integer = 10

While numero >= 0
  Console.WriteLine(numero)
  numero -= 1
End While

Dim pode As Boolean = True
Dim valor As Integer = 1

While pode
  Console.WriteLine(valor)
  valor += 1

  If valor > 20 Then
    pode = False
  End If
End While