import { Component } from '@angular/core';

@Component({
  selector: 'app-root',
  templateUrl: './app.component.html',
  styleUrls: ['./app.component.css']
})
export class AppComponent {
  linguagens: string[];

  constructor() {
    this.linguagens = ["Java", "C++", "Delphi", "PHP", "Perl"];
  }
}

<h2>Minhas linguagens favoritas:</h2>

<ul *ngFor="let linguagem of linguagens">
  <li>{{ linguagem }}</li>
</ul>

void __fastcall TForm3::Button2Click(TObject *Sender)
{
  // vamos obter a quantidade de caracteres no TEdit
  int tamanho = Edit1->GetTextLen();

  // vamos mostrar o resultado
  ShowMessage("O Edit contém " + IntToStr(tamanho) + " caracteres.");
}

# Definição da classe Cliente
class Cliente
   def definir_nome(nome)
      @nome = nome
   end
    
   def obter_nome
      @nome
   end
end

# Cria uma instância da classe Cliente
cliente = Cliente.new

# Efetua uma chamada ao método definir_nome
cliente.definir_nome("Laura Maria dos Santos")

# Efetua uma chamada ao método obter_nome
print "O nome do cliente é " + cliente.obter_nome

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

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos pedir para o usuário informar uma letra, símbolo ou pontuação
    Console.Write("Informe um caractere: ")

    ' vamos ler o caractere informado
    Dim caractere As Char = Console.ReadLine()(0)

    ' agora vamos obter o código ASCII correspondente
    Dim codigo As Integer = Asc(caractere)

    ' e mostramos o resultado
    Console.WriteLine("Você informou o caractere: " & caractere)
    Console.WriteLine("O código ASCII correspondente é: " & codigo)

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