; programa LISP que converte Coordenadas Polares
; em Coordenadas Cartesianas
(let((raio)(theta)(graus)(x)(y))
  ; vamos ler o raio e o ângulo
  (princ "Informe o raio: ")
  (force-output)
  (setq raio (read))
  (princ "Informe o theta: ")
  (force-output)
  (setq theta (read))
  (princ "Theta em graus (1) ou radianos (2): ")
  (force-output)
  (setq graus (read))
  
  ; o theta está em graus?
  (if(eq graus 1)
    (setq theta (* theta (/ pi 180.0)))    
  )
  
  ; fazemos a conversão para coordenadas cartesianas 
  (setq x (* raio (cos theta)))
  (setq y (* raio (sin theta)))
  
  ; exibimos o resultado
  (format t "As Coordenadas Cartesianas são: (x = ~F, y = ~F)"
    x y)
)

	
int toupper(int c);

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

void strtoupper(char *string){
  while(*string){
    *string = toupper(*string);
    string++;
  }
}

int main(int argc, char *argv[])
{
  char frase[] = "Programando em C";
  printf("Frase normal: %s\n", frase);
  
  strtoupper(frase);
  
  printf("Em letras maiusculas: %s\n\n", frase);
  
  system("PAUSE");	
  return 0;
}

using System;

namespace Estudos {
  class Program {
    static void Main(string[] args) {
      // cria um array de inteiros
      int[] valores = new int[5] { 3, 2, 5, 11, 13 };

      // exibe o valor do primeiro elemento
      Console.WriteLine("O valor do primeiro elemento é {0} ", 
        valores[0]);

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

Graphics.DrawRectangle(Pen, Single, Single, Single, Single)

private void button1_Click(object sender, EventArgs e){
  // vamos obter o Graphics do formulário
  Graphics g = this.CreateGraphics();

  // vamos desenhar um retângulo de 250 pixels de largura por 150
  // pixels de altura
  g.DrawRectangle(new Pen(Color.Red, 1), 50, 50, 250, 150);

  // vamos liberar o objeto Graphics
  g.Dispose();
}

private void button1_Click(object sender, EventArgs e){
  // vamos obter o Graphics do formulário
  Graphics g = this.CreateGraphics();

  // vamos desenhar um retângulo de 250 pixels de largura por 150
  // pixels de altura
  g.DrawRectangle(new Pen(Color.Red, 1), 
    new Rectangle(100, 100, 250, 150));

  // vamos liberar o objeto Graphics
  g.Dispose();
}