package estudos;

import java.util.Scanner;

public class Estudos{
  public static void main(String[] args){
    // vamos usar a classe Scanner para ler os dados
    Scanner entrada = new Scanner(System.in);
    
    // vamos ler as coordenadas do primeiro ponto
    System.out.print("Coordenada x do primeiro ponto: ");
    double x1 = Double.parseDouble(entrada.nextLine());
    System.out.print("Coordenada y do primeiro ponto: ");
    double y1 = Double.parseDouble(entrada.nextLine());
    
    // vamos ler as coordenadas do segundo ponto
    System.out.print("Coordenada x do segundo ponto: ");
    double x2 = Double.parseDouble(entrada.nextLine());
    System.out.print("Coordenada y do segundo ponto: ");
    double y2 = Double.parseDouble(entrada.nextLine());
    
    String sinal = "+";
    // vamos calcular o coeficiente angular da reta
    double m = (y2 - y1) / (x2 - x1);
    // vamos calcular o coeficiente linear
    double n = y1 - (m * x1);
 
    // coeficiente linear menor que zero? O sinal será negativo
    if (n < 0){
      sinal = "-";
      n = n * -1;
    }
  
    // mostra a equação reduzida da reta
    System.out.println("Equação reduzida: y = " + m + "x" 
      + " " + sinal + " " + n);
    
    System.exit(0);
  }
}

>> y = (-0.75 * 3) + 8.75
y = 6.5000

procedure TForm2.Button1Click(Sender: TObject);
var
  areaDesenho: TCanvas;
begin
  // este trecho de código mostra como desenhar uma
  // linha horizontal no formulário

  // vamos obter o canvas do formulário
  areaDesenho := Form2.Canvas;

  // vamos mover a caneta para as coordenadas x = 30; y = 100
  areaDesenho.MoveTo(30, 100);

  // vamos desenhar uma linha no formulário partindo
  // das coordenadas anteriores até as coordenadas
  // x = 300; y = 100
  areaDesenho.LineTo(300, 100);
end;

procedure TForm2.Button1Click(Sender: TObject);
begin
  // este trecho de código mostra como desenhar uma
  // linha horizontal no formulário

  // vamos obter o canvas do formulário
  with Form2.Canvas do
    begin
      // vamos mover a caneta para as coordenadas x = 30; y = 100
      MoveTo(30, 100);

      // vamos desenhar uma linha no formulário partindo
      // das coordenadas anteriores até as coordenadas
      // x = 300; y = 100
      LineTo(300, 100);
    end;
end;

LRESULT SendMessage(          
  HWND hWnd,
  UINT Msg,
  WPARAM wParam,
  LPARAM lParam
);

// Protótipo
{$EXTERNALSYM SendMessage}
function SendMessage(hWnd: HWND; Msg: UINT; wParam: WPARAM; 
  lParam: LPARAM): LRESULT; stdcall;

// Implementação
function SendMessage; external user32 name 'SendMessageW';

procedure TForm1.Button1Click(Sender: TObject);
var
  tamanho: Integer;
begin
  // vamos obter a quantidade de caracteres na caixa de texto
  tamanho := SendMessage(Edit1.Handle, WM_GETTEXTLENGTH, 0, 0);

  // vamos exibir o resultado
  ShowMessage('O edit contém ' + IntToStr(tamanho) + ' caracteres.');
end;

package arquivodecodigos;

import java.util.Scanner;

public class Estudos{
  public static void main(String args[]){
    // vamos usar um objeto Scanner para ler a entrada
    // do usuário
    Scanner entrada = new Scanner(System.in);
    
    // vamos ler a quantidade de anos
    System.out.print("Quantidade de anos: ");
    int anos = Integer.parseInt(entrada.nextLine());
    
    // vamos ler a quantidade de meses
    System.out.print("Quantidade de meses: ");
    int meses = Integer.parseInt(entrada.nextLine());
    
    // vamos ler a quantidade de dias
    System.out.print("Quantidade de dias: ");
    int dias = Integer.parseInt(entrada.nextLine());
    
    // vamos calcular a quantidade de dias
    int quant_dias = (anos * 365) + (meses * 30) + dias;
    
    // e mostramos o resultado
    System.out.println("Idade em dias: " + quant_dias);
  }
}