(
  ; vamos declarar a variável que vamos usar
  let (numero)	
  ; vamos inicializar a variável com o valor 1
  (setq numero 1)
  ; agora iniciamos o laço
  (loop 
    ; escrevemos o valor da variável
    (write numero)
    ; aumentamos o valor da variável em 1
    (setq numero (+ numero 1))
    ; provocamos uma quebra de linha 
    (terpri)
    ; e fazemos o teste da continuidade
    (when (> numero 10) (return))
  )
)

package estudos;

import java.util.Scanner;

public class Estudos{
  public static void main(String[] args){
    // para efetuar a leitura do usuário
    Scanner entrada = new Scanner(System.in);
    
    // os coeficientes
    double a, b, c;
    // as duas raizes, a imaginaria e o discriminante
    double raiz1, raiz2, imaginaria, discriminante;

    // vamos pedir para o usuário informar os valores dos coeficientes
    System.out.print("Valor do coeficiente a: ");
    a = Double.parseDouble(entrada.nextLine());
    System.out.print("Valor do coeficiente b: ");
    b = Double.parseDouble(entrada.nextLine());
    System.out.print("Valor do coeficiente c: ");
    c = Double.parseDouble(entrada.nextLine());
    
    // vamos calcular o discriminante
    discriminante = (b * b) - (4 * a * c);
    
    // a equação possui duas soluções reais?
    if(discriminante > 0){
      raiz1 = (-b + Math.sqrt(discriminante)) / (2 * a);
      raiz2 = (-b - Math.sqrt(discriminante)) / (2 * a);
      System.out.println("Existem duas raizes: x1 = " + raiz1 
        + " e x2 = " + raiz2);
    }
    // a equação possui uma única solução real?
    else if(discriminante == 0){
      raiz1 = raiz2 = -b / (2 * a);
      System.out.println("Existem duas raizes iguais: x1 = " 
         + raiz1 + " e x2 = " + raiz2);  	
    }
    // a equação não possui solução real?
    else if(discriminante < 0){
      raiz1 = raiz2 = -b / (2 * a);
      imaginaria = Math.sqrt(-discriminante) / (2 * a);
      System.out.println("Existem duas raízes complexas: x1 = " + 
	raiz1 + " + " + imaginaria + " e x2 = " + raiz2 
           + " - " + imaginaria);
    }
  }
}

// um array de inteiros contendo sete elementos
int valores[] = {-3, 9, 12, -34, -2, 20, 10};

public static void main(String[] args){
  // um array de inteiros contendo sete elementos
  int valores[] = {-3, 9, 12, -34, -2, 20, 10};
    
  // o primeiro passo é criar uma variável que vai receber a soma
  // dos valores positivos
  int soma_positivos = 0;

  // agora uma variável para receber a quantidade de valores negativos
  int quant_negativos = 0;

  // agora vamos usar uma laço for para percorrer todos os elementos
  // do array
  for(int i = 0; i < valores.length; i++){
    // vamos verificar se o valor do elemento atual é negativo
    if(valores[i] < 0){
      quant_negativos++;  
    }
    else{ // o valor é positivo
      soma_positivos = soma_positivos + valores[i]; 
    }
  }

  // vamos exibir a soma dos valores positivos
  System.out.println("A soma dos valores positivos é: " + soma_positivos);

  // vamos exibir a quantidade de valores negativos
  System.out.println("A quantidade de valores negativos é: " + quant_negativos);
}

public static void main(String[] args){
  // um vetor de inteiros contendo cinco elementos
  int valores[] = {5, 32, 9, 10, 6};
    
  // vamos usar um laço for para exibir os valores dos elementos
  // do vetorz
  for(int i = 0; i <= 5; i++){
    System.out.println("O valor do " + (i + 1) + "º elemento é " + valores[i]);
  }
}

O valor do 1º elemento é 5
O valor do 2º elemento é 32
O valor do 3º elemento é 9
O valor do 4º elemento é 10
O valor do 5º elemento é 6
Exception in thread "main" 
   java.lang.ArrayIndexOutOfBoundsException: 5
   at javaapplication1.Main.main(Main.java:14)
Java Result: 1

O erro no código é de lógica. Como temos cinco elementos no vetor
e o índice do último elemento é 4 (o índice do primeiro elemento é 0),
o valor da variável de controle do laço for não pode ultrapassar 4. No
código acima o valor da variável i vai até 5, o que provoca um erro 
ao tentar acessar um elemento do vetor que não existe.

Para corrigir o erro, basta alterar a linha:

for(int i = 0; i <= 5; i++){

para:

for(int i = 0; i < 5; i++){

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

int main(int argc, char *argv[])
{
  char texto[] = "Gosto muito de C e C++";
  char numeros[] = "1234567890";

  char *pos_atual = strpbrk(texto, numeros);

  if(pos_atual != NULL){
    puts("A string contem digitos");
  }
  else{
    puts("A string NAO contem digitos");
  }

  system("pause");
  return 0;
}