Informe um caractere: A
Você informou o caractere: A
O código ASCII correspondente é: 65

algoritmo "Como retornar código ASCII em VisuAlg"
var
  // variáveis usadas na resolução do problema
  ch: caractere
  codigo: inteiro

inicio
  // vamos pedir para o usuário informar uma letra, símbolo ou pontuação
  escreva("Informe um caractere: ")
  leia(ch)

  // agora vamos obter o código ASCII correspondente
  codigo <- Asc(ch)

  // e mostramos o resultado
  escreval("Você informou o caractere: ", ch)
  escreval("O código ASCII correspondente é: ", codigo)

fimalgoritmo

# função principal do programa
def main():
  # vamos ler as coordenadas do primeiro vértice
  va_x = float(input("Informe o x do primeiro vértice: "))
  va_y = float(input("Informe o y do primeiro vértice: "))

  # vamos ler as coordenadas do segundo vértice
  vb_x = float(input("Informe o x do segundo vértice: "))
  vb_y = float(input("Informe o y do segundo vértice: "))

  # vamos ler as coordenadas do terceiro vértice
  vc_x = float(input("Informe o x do terceiro vértice: "))
  vc_y = float(input("Informe o y do terceiro vértice: "))
  
  # vamos calcular as coordenadas do centroide
  c_x = (va_x + vb_x + vc_x) / 3
  c_y = (va_y + vb_y + vc_y) / 3

  # vamos mostrar o resultado
  print("As coordenadas do centroide são: x={0}; y={1}".format(
    round(c_x, 2), round(c_y, 2))) 

if __name__== "__main__":
  main()

package arquivodecodigos;

public class Estudos{
  public static void main(String[] args){
    int[] valores = new int[5];
  
    // inicializa os elementos do vetor
    valores[0] = 23;
    valores[1] = 65;
    valores[2] = 2;
    valores[3] = 87;
    valores[4] = 34;
     
    // obtém a média
    double media = media(valores);
     
    System.out.println("A media dos valores é: " + media);
   
    System.exit(0);
  }
 
  // método que recebe um vetor de ints e retorna a média
  // dos valores de seus elementos
  public static double media(int[] a){
    double total = 0.0;
    for(int i = 0; i < a.length; i++){
      total += a[i];  
    }
     
    return (total / a.length);
  }
}

>> pkg load symbolic [ENTER]
>> syms x [ENTER]
>> f = x ** 5 [ENTER]
f = (sym)

   5
  x

>> diff(f, x) [ENTER]
ans = (sym)

     4
  5*x

>>