program programa02;  // O programa se chama 'programa02'

  // DEFININDO, DECLARANDO CONSTANTES
  Const
    time = 'Chicago Bulls';  // a CONSTANTE 'time' é igual a 'Chicago Bulls'
    salario = '240,00';  // a CONSTANTE 'salario' é igual a 240.00


  // DEFININDO, DECLARANDO VARIÁVEIS
  var
    numero1, numero2, resultado : integer;  // define a variável 'numero1', 'numero2' e 'resultado como do tipo INTEGER (inteiro)
    nome, sobrenome : string;  // define a variável 'nome' e 'sobrenome' como do tipo STRING(caracteres)


  begin

    // ATRIBUINDO VALORES ÀS VARIÁVEIS
    numero1 := 6;  // atribui o valor INTEIRO 6 à variável 'numero1'
    numero2 := 2;  // atribui o valor INTEIRO 2 à variável 'numero2'
    resultado := (numero1 + numero2);  // atribui o valor da soma de 'numero1' e 'numero2' à variável 'resultado'
    nome := 'Eder';  // atribui a STRING 'Eder' à variável 'nome'
    sobrenome := 'Jordam';  // atribui a STRING 'Jordam' à variável 'sobrenome'

    // EXIBINDO OS RESULTADOS DAS OPERAÇÕES PARA O USUÁRIO
    writeln ('Oi, este é meu segundo software em PASCAL!');  // Exibe, imprime no monitor de vídeo do usuário a frase 'Olá, este é meu segundo software em PASCAL!
    writeln ('---------------------------------------------------------------------');
    writeln ('Meu nome é ' + nome + ' e meu sobrenome é ' + sobrenome);  // Exibe, imprime no monitor de vídeo do usuário a frase 'Meu nome é Eder e meu sobrenome é Jordam'
    writeln ('---------------------------------------------------------------------');
    writeln ('Eu sou torcedor de um dos melhores times da NBA: ' + time);  // Exibe, imprime no monitor de vídeo do usuário a frase 'Eu sou torcedor de um dos melhores times da NBA: Chicago Bulls'
    writeln ('---------------------------------------------------------------------');
    writeln ('A soma do algarismo 6 com o algarismo 2 é ');  // Exibe, imprime no monitor de vídeo do usuário a frase 'A soma do algarismo 6 com o algarismo 2 é'
    writeln (resultado);  // Exibe, imprime no monitor de vídeo do usuário o número armazenado na variável 'resultado'

    if (numero1 > numero2) then  // SE numero1 FOR MAIOR QUE numero2 ENTÃO
      begin
        writeln ('---------------------------------------------------------------------');
        writeln ('O numero1 É MAIOR que o numero2');  // exibe a frase: 'O numero1 É MAIOR que o numero2'
        writeln ('---------------------------------------------------------------------');
      end
    else  // SENAO
      begin
        writeln ('---------------------------------------------------------------------');
        writeln ('O numero1 NÃO É MAIOR que o numero2');  // exibe a frase: 'O numero1 NÃO É MAIOR que o numero2'
        writeln ('---------------------------------------------------------------------');
      end;

    writeln ('Atualmente o trabalhar brasileiro ganha de salário mínimo R$ ' + salario);  // Exibe, imprime no monitor de vídeo do usuário a frase 'Atualmente o trabalhar brasileiro ganha de salário mínimo R$ 240,00'
    writeln ('---------------------------------------------------------------------');

  end.