Dim numero As Integer = 0

While numero <= 10
  Console.WriteLine(numero)
  numero += 1
End While

Dim numero As Integer = 10

While numero >= 0
  Console.WriteLine(numero)
  numero -= 1
End While

Dim pode As Boolean = True
Dim valor As Integer = 1

While pode
  Console.WriteLine(valor)
  valor += 1

  If valor > 20 Then
    pode = False
  End If
End While

Informe um valor inteiro (0-999): 523
A soma dos dígitos é: 10

public static void main(String[] args){
  // não se esqueça de adicionar um import para a classe Scanner
  // import java.util.Scanner;

  // vamos criar um objeto da classe Scanner
  Scanner entrada = new Scanner(System.in);

  // vamos solicitar ao usuário que informe um valor inteiro
  // na faixa 0 a 999 (incluindo)
  System.out.print("Informe um valor inteiro (0-999): ");

  // vamos ler o valor informado
  int valor = Integer.parseInt(entrada.next());

  // vamos verificar se o valor está na faixa permitida
  if(valor < 0 || valor > 999){
    System.out.println("Valor fora da faixa permitida");
    System.exit(0);
  }

  // vamos obter o terceiro dígito
  int terceiro = valor % 10;
  // obtém os digitos restantes
  valor = valor / 10;

  // vamos obter o segundo dígito
  int segundo = valor % 10;
  // obtém os digitos restantes
  valor = valor / 10;

  // vamos obter o primeiro dígito
  int primeiro = valor % 10;
  // obtém os digitos restantes
  valor = valor / 10;

  // vamos obter a soma dos dígitos
  int soma = terceiro + segundo + primeiro;

  // vamos mostrar o resultado
  System.out.println("A soma dos dígitos é: " + soma);
}

# importamos a biblioteca Pandas
import pandas as pd

def main():
  # vamos carregar os dados do arquivo .csv
  dados = pd.read_csv("C:\\estudos_python\\emprestimos.csv",
   delimiter=";")

  # vamos mostrar o DataFrame resultante
  print(dados)

if __name__== "__main__":
  main()

    id nome       idade sexo renda valor parc pont ap
0    1 MIGUEL728   24    M   1800  12500  30   34   S
1    2 RAUL46      61    M   2300  10000  24   59   S
2    3 JONAS264    28    M    800  12500  36   59   N
3    4 LETICIA135  71    F   1800  10000  36   13   N
4    5 CARLOS931   60    F   4000   2000   6   10   N
.. ...   ...    ...  ...    ...    ...   ...   ... ..
9   96 ANGELA391   91    F   4000  12500  12   33   N
96  97 PEDRO764    50    M  10200   2500  12    1   N
97  98 ADRIANA175  41    F   4000   2000  36   77   S
98  99 ROSA666     42    F   1800  20000  24   74   N
99 100 SARA653     36    F    970  11000  12   42   N

[100 rows x 9 columns]

Imports System

Module Program
  Sub Main(args As String())
    Dim valor As Integer

    Console.Write("Informe um número inteiro: ")
    valor = Val(Console.ReadLine())

    If valor Mod 2 = 0 Then
      Console.WriteLine("O número é par")
    Else
      Console.WriteLine("O número é ímpar")
    End If

    Console.WriteLine("\nPressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub
End Module