package arquivodecodigos;

import javax.swing.*;
import java.awt.*;
import java.awt.event.*;

public class Estudos extends JFrame {
  JTextArea textArea;
  JTextField texto;
  JButton btn;

  public Estudos() {
    super("Como adicionar texto a um JTextArea");
    Container c = getContentPane();
    FlowLayout layout = new FlowLayout(FlowLayout.LEFT);
    c.setLayout(layout);

    textArea = new JTextArea(10, 20);

    texto = new JTextField(10);
    btn = new JButton("Adicionar Texto");
    btn.addActionListener(
      new ActionListener() {
        public void actionPerformed(ActionEvent e) {
          textArea.append(texto.getText());
        }
      }
    );

    c.add(textArea);
    c.add(texto);
    c.add(btn);

    setSize(350, 250);
    setVisible(true);
  }

  public static void main(String args[]) {
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
}

package arquivodecodigos;

public class Estudos{
  public static void main(String[] args){
    StringBuffer frase = new StringBuffer("Java");
    System.out.println("Original: " + frase); 
    
    frase.deleteCharAt(1); // exclui a primeira letra "a"
     
    System.out.println("Depois da remoção: " + frase);
     
    System.exit(0);
  }
}

' declara, constrói e inicializa um vetor de 10 inteiros
Dim valores As Integer() = {4, 21, 9, 8, 12, 21, 4, 4, 1, 10}

Informe um valor: 4
O valor foi encontrado: 3 vezes

Informe um valor: 8
O valor foi encontrado: 1 vezes

Informe um valor: 3
O valor foi encontrado: 0 vezes

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' declara, constrói e inicializa um vetor de 10 inteiros
    Dim valores As Integer() = {4, 21, 9, 8, 12, 21, 4, 4, 1, 10}

    ' vamos ler um valor inteiro
    Console.Write("Informe um valor: ")
    Dim pesquisa As Integer = Int32.Parse(Console.ReadLine())

    ' vamos verificar quantas vezes o valor informado está
    ' contido no vetor
    Dim repeticoes As Integer = 0
    For i As Integer = 0 To valores.Length - 1
      If valores(i) = pesquisa Then
        ' encontrou? vamos contar esta ocorrência
        repeticoes = repeticoes + 1
      End If
    Next

    ' vamos mostrar o resultado
    Console.WriteLine("O valor foi encontrado: " &
      repeticoes & " vezes")

    Console.WriteLine(vbCrLf & vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub

End Module

# importa o módulo date
require 'date'

# obtém a data de hoje
hoje = Date.today

# exibe o resultado
puts "Hoje é " + hoje.strftime("%e/%m/%Y")

import math as math

def main():
  # vamos ler o raio do círculo
  raio = float(input("Informe o raio do círculo: "))
  
  # vamos achar o diâmetro do círculo
  diametro = 2 * raio
  # agora calculamos a circunferência
  circunferencia = 2 * math.pi * raio
  # finalmente calculamos a área do círculo
  area = math.pi * math.pow(raio, 2)
    
  # vamos mostrar os resultados
  print("O diâmetro do círculo é:", diametro)
  print("A circunferência do círculo é:", circunferencia)
  print("A área do círculo é:", area)

if __name__== "__main__":
  main()