Numeros primos entre 2 e 100: 
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97

package estudos;

public class Estudos {
  public static void main(String[] args) {
    // limite dos números primos (incluindo)
    int limite = 100;
               
    // Lembre-se! O número 1 não é primo
    System.out.println("Numeros primos entre 2 e " + limite + ": ");
  
    // laço que percorre os valores de 2 até o limite desejado
    for(int i = 2; i <= limite; i++){
       boolean primo = true;
                       
       // se o valor de i for 7, a variável j do laço contará
       // de 2 até 7 / 2 (divisão inteira), ou seja, 3. Se o 
       // módulo de 7 por qualquer um dos valores neste intervalo 
       // for igual a 0, então o número não é primo
       for(int j = 2; j <= (i / 2); j++){
         if(i % j == 0){
           primo = false; // não é primo
           break;
         }
       }
    
       if(primo){
         System.out.print(i + " ");
       }
    }
    
    System.out.println();
  }
}

def main():
  string = "49380"
 
  if string.isdigit():
    print("A string contém apenas números")
  else:
    print("A string não contém somente números")
 
if __name__== "__main__":
  main()

index(substring[, start[, end]])

def main():
  frase = "Gosto de Python e JavaScript"

  try:
    indice = frase.index("Python")
  except ValueError:
    print("A palavra não foi encontrada")
  else:
    print("A palavra foi encontrada no índice", indice)

if __name__== "__main__":
  main()

def main():
  string = "GOSTO DE PYTHON E JAVA"

  if string.isupper():
    print("A string está em letras maiúsculas")
  else:
    print("A string não está em letras maiúsculas")

if __name__== "__main__":
  main()

procedure TForm1.Button2Click(Sender: TObject);
var
  i: Integer;
  MidiOutCaps: TMidiOutCaps; // este registro (record) está definido em MMSystem.pas
  erro: Word;
begin
  // uses MMSystem

  ComboBox2.Clear;
  // midiOutGetNumDevs retorna a quantidade de dispositivos de saída MIDI no sistema
  for i := 0 to midiOutGetNumDevs - 1 do
  begin
    // vamos obter o dispositivo identificado pela variável i (uDeviceID)
    erro := midiOutGetDevCaps(i, @MidiOutCaps, sizeof(TMidiOutCaps));
    if erro <> MMSYSERR_NOERROR then
       raise Exception.Create('Não foi possível obter a lista de dispositivos ' +
         'de saída MIDI');

    // vamos adicionar o nome do dispositivo no ComboBox
    ComboBox2.Items.Add(StrPas(MidiOutCaps.szPname));
  end;
end;