Informe a quantidade de homens: 30
A quantidade de homens é: 30
A quantidade de mulheres é: 18.0

#include <stdio.h>
#include <stdlib.h>

// função principal do programa
int main(int argc, char *argv[]){
  // variáveis usadas na resolução do problema
  float dividendo = 3.0;
  float divisor = 5.0;
  int quant_homens;
  float quant_mulheres;
    
  // vamos ler a quantidade de homens
  printf("Informe a quantidade de homens: ");
  scanf("%d", &quant_homens);
  printf("A quantidade de homens é: %d", quant_homens);
    
  // agora fazemos a multiplicação cruzada
  quant_mulheres = (quant_homens * dividendo);
  // e dividimos pelo divisor
  quant_mulheres = quant_mulheres / divisor;
    
  // e mostramos o resultado
  printf("\nA quantidade de mulheres é: %f", quant_mulheres);
  
  printf("\n\n");
  system("PAUSE");
  return 0;
}

package estudos;

import java.util.Scanner;

public class Estudos {
  public static void main(String[] args) {
    Scanner entrada = new Scanner(System.in);  
    
    // vamos solicitar os dados de entrada
    System.out.print("Velocidade de entrada (m/s): ");
    double v1 = Double.parseDouble(entrada.nextLine());
    System.out.print("Área de entrada (milímetros quadrados): ");
    double a1 = Double.parseDouble(entrada.nextLine());
    System.out.print("Área de saída (milímetros quadrados): ");
    double a2 = Double.parseDouble(entrada.nextLine());
    
    // vamos converter as áreas em milímetros quadrados
    // para metros quadrados
    a1 = a1 / 1000000;
    a2 = a2 / 1000000;
    
    // agora calculamos a velocidade de saída
    double v2 = (a1 * v1) / a2;
    
    // e mostramos o resultado
    System.out.println("A velocidade de saída é: " + v2 +
      " m/s");
    
    System.out.println("\n");
  }
}

procedure TForm1.Button1Click(Sender: TObject);
begin
  // vamos definir a quantidade de linhas e colunas fixas
  // no TStringGrid
  StringGrid1.FixedRows := 0;
  StringGrid1.FixedCols := 0;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // vamos obter a quantidade de linhas e colunas fixas
  // no TStringGrid
  Memo1.Lines.Add('Quantidade de linhas fixas: ' +
    IntToStr(StringGrid1.FixedRows));
  Memo1.Lines.Add('Quantidade de colunas fixas: ' +
    IntToStr(StringGrid1.FixedCols));
end;