Informe o salário: 1350
Valor da primeira conta: 140
Valor da segunda conta: 300

Total das contas sem juros: 440.0
Total dos juros: 8.8
Total das contas com juros: 448.8
Sobra do salário: 901.2

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

int main(int argc, char *argv[]){
  setlocale(LC_ALL,""); // para acentos do português

  double salario, conta1, conta2, total_contas;
  double total_juros, total_contas_com_juros;
  double total_contas_sem_juros, sobra_salario;

  // vamos pedir que o usuário informe o valor do salário e das duas contas
  printf("Informe o salário: ");
  scanf("%lf", &salario);
  printf("Valor da primeira conta: ");
  scanf("%lf", &conta1);
  printf("Valor da segunda conta: ");
  scanf("%lf", &conta2);
    
  // total a ser pago nas duas contas sem os juros
  total_contas = conta1 + conta2;
  // calcula os juros
  total_juros = total_contas * 0.02;
  // total a ser pago com juros
  total_contas_com_juros = total_contas + total_juros;
  // sobra do salário
  sobra_salario = salario - total_contas_com_juros;
    
  // mostra os resultados
  printf("\nTotal das contas sem juros: %lf", total_contas);
  printf("\nTotal dos juros: %lf", total_juros);
  printf("\nTotal das contas com juros: %lf", total_contas_com_juros);
  printf("\nSobra do salário: %lf", sobra_salario);
  
  printf("\n\n");
  system("PAUSE");	
  return 0;
}

procedure TForm3.Button3Click(Sender: TObject);
begin
  // vamos ativar o client dataset
  ClientDataSet1.Active := True;

  // vamos testar se o client dataset foi mesmo ativado
  if ClientDataSet1.Active then
    ShowMessage('O ClientDataSet está ativo')
  else
    ShowMessage('O ClientDataSet  NÃO está ativo')
end;

private void button1_Click(object sender, EventArgs e){
  // vamos obter o item selecionado no ComboBox
  // chamado "cidades"
  object sel = cidades.SelectedItem;

  // vamos exibir o resultado
  MessageBox.Show("Valor do elemento: " + sel.ToString());
}

private void button1_Click(object sender, EventArgs e){
  // vamos obter o item selecionado no ComboBox
  // chamado "cidades"
  string sel = (string)cidades.SelectedItem;

  // vamos exibir o resultado
  MessageBox.Show("Valor do elemento: " + sel.ToString());
}

Cannot implicitly convert type 'object' to 'string'. An 
explicit conversion exists (are you missing a cast?)

# x e y do primeiro ponto
x1 = input("Coordenada x do primeiro ponto: ")
y1 = input("Coordenada y do primeiro ponto: ")

# x e y do segundo ponto
x2 = input("Coordenada x do segundo ponto: ")
y2 = input("Coordenada y do segundo ponto: ")

# agora vamos calcular o coeficiente angular
m = (y2 - y1) / (x2 - x1)

# mostramos o resultado
fprintf("O coeficiente angular é: %f\n\n", m)

# x e y do primeiro ponto
x1 = input("Coordenada x do primeiro ponto: ")
y1 = input("Coordenada y do primeiro ponto: ")

# x e y do segundo ponto
x2 = input("Coordenada x do segundo ponto: ")
y2 = input("Coordenada y do segundo ponto: ")

# vamos obter o comprimento do cateto oposto
cateto_oposto = y2 - y1
# e agora o cateto adjascente
cateto_adjascente = x2 - x1
# vamos obter o ângulo tetha, ou seja, a inclinação da hipetunesa
# (em radianos, não se esqueça)
tetha = atan2(cateto_oposto, cateto_adjascente)
# e finalmente usamos a tangente desse ângulo para calcular
# o coeficiente angular
tangente = tan(tetha)

# mostramos o resultado
fprintf("O coeficiente angular é: %f\n\n", tangente)

procedure TForm3.Button3Click(Sender: TObject);
begin
  // vamos alterar o valor da propriedade State para csCustomized
  DBGrid1.Columns.State := csCustomized;
end;

procedure TForm3.Button3Click(Sender: TObject);
begin
  // vamos alterar o valor da propriedade State para csCustomized
  DBGrid1.Columns.State := csCustomized;

  // vamos adicionar uma nova coluna
  DBGrid1.Columns.Add;
end;