Você está aqui: Lisp ::: Dicas & Truques ::: Strings e Caracteres |
Como retornar o primeiro caractere de uma string em LISP usando a função char() e o índice 0Quantidade de visualizações: 436 vezes |
Nesta dica mostrarei como podemos acessar e retornar o primeiro caractere de uma palavra, frase ou texto na linguagem Common Lisp. Para isso nós vamos usar a função char() e fornecer o índice 0, uma vez que strings em LISP são tratadas com sequências, tais como list, vector, array, etc. Note que este código é interessante, pois permite o desenvolvimento de funções auxiliares que só podem ser encontradas em bibliotecas LISP externas. Veja o código LISP completo para o exemplo: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; variáveis que vamos usar no programa (let ((palavra)(letra)) ; Vamos pedir para o usuário informar ; uma palavra (princ "Informe uma palavra: ") ; talvez o seu compilador não precise disso (force-output) ; atribui o valor lido à variável palavra (setq palavra (read-line)) ; vamos mostrar a palavra informada ; o símbolo ~% provoca uma quebra de linha (format t "A palavra informada foi: ~S~%" palavra) ; agora vamos obter a primeira letra da palavra (setq letra (char palavra 0)) ; e mostramos o resultado (format t "A primeira letra da palavra é: ~C" letra) ) Ao executar este código LISP nós teremos o seguinte resultado: A palavra informada foi: "Common Lisp" A primeira letra da palavra é: C |
![]() |
Lisp ::: Desafios e Lista de Exercícios Resolvidos ::: Estruturas de Controle |
Exercícios Resolvidos de LISP - Um programa que lê duas notas, calcula a média aritmética e exibe uma mensagem de reprovado, exame ou aprovadoQuantidade de visualizações: 409 vezes |
Pergunta/Tarefa: Escreva um programa LISP ou Common Lisp que leia duas notas (como double ou float), calcule e mostre a média aritmética e uma mensagem de acordo com as seguintes regras: 1) Se a média for inferior a 4,0 escreva "Reprovado"; 2) Se a média for igual ou superior a 4,0 e inferior a 7,0 escreva "Exame"; 3) Se a média for igual ou superior a 7,0 escreva "Aprovado". Sua saída deverá ser parecida com: Informe a primeira nota: 8 Informe a segunda nota: 7.4 A média obtida foi: 7.7 Aprovado Veja a resolução comentada deste exercício usando Common Lisp (a padronização da linguagem LISP): ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; Algoritmo LISP para calcular a média de um aluno ; variáveis que vamos usar no programa (let ((n1)(n2)(media)) ; vamos solicitar as duas notas do aluno (princ "Informe a primeira nota: ") (force-output) (setq n1 (read)) (princ "Informe a segunda nota: ") (force-output) (setq n2 (read)) ; vamos calcular a média aritmética (setq media (/ (+ n1 n2) 2)) (format t "A média obtida foi ~F" media) ; vamos verificar se o aluno foi reprovado, está de exame ou aprovado (cond ((< media 4.0) ; reprovado (format t "~%Reprovado")) ((and (>= media 4.0)(< media 7.0)) ; exame (format t "~%Exame")) (t (format t "~%Aprovado")) ) ) |
Lisp ::: Desafios e Lista de Exercícios Resolvidos ::: Lisp Básico |
Exercícios Resolvidos de Lisp - Como converter quilômetros em metros, centímetros e milímetros usando LispQuantidade de visualizações: 775 vezes |
Pergunta/Tarefa: Escreva um programa em Common Lisp para converter quilômetros em metros, centímetros e milímetros. Seu programa deverá pedir para o usuário informar a quantidade de quilômetros e exibir as conversões solicitadas. Como sabemos, um Quilômetro = 1000 Metros, 100.000 Centímetros ou 1.000.000 Milímetros. Seu programa deverá exibir uma saída parecida com: Informe a distância em quilômetros: 2.5 Distância em Quilômetros: 2.5 Distância em Metros: 2500.0 Distância em Centímetros: 250000.0 Distância em Milímetros: 2500000.0 Veja a resolução comentada deste exercício usando Common Lisp: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; Variáveis usadas na resolução do problema (let ((quilometros)(metros)(centimetros)(milimetros)) ; vamos ler a quantidade de quilômetros (princ "Informe a distância em quilômetros: ") ; talvez o seu compilador não precise disso (force-output) ; atribui o valor lido à variável quilometros (setq quilometros (read)) ; vamos calcular a distância em metros (setq metros (* quilometros 1000.0)) ; vamos calcular a distância em centímetros (setq centimetros (* quilometros 100000.0)) ; e agora a distância em milímetros (setq milimetros (* quilometros 1000000.0)) ; E mostramos o resultado (format t "Distância em Quilômetros: ~F" quilometros) (format t "~%Distância em Metros: ~F" metros) (format t "~%Distância em Centímetros: ~F" centimetros) (format t "~%Distância em Milímetros: ~F" milimetros) ) |
Lisp ::: Dicas & Truques ::: Passos Iniciais |
O que é Lisp e como escrever seu primeiro programa nessa linguagem de programaçãoQuantidade de visualizações: 1356 vezes |
O que é Common Lisp? A linguagem de programação ANSI Common Lisp, ou simplesmente Common Lisp, é uma implementação específica da linguagem de programação Lisp multi-paradigma que suporta programação funcional e procedural. Sua especificação foi criada por Guy L. Steele nos anos 1980 a partir da linguagem Lisp com o intuito de combinar aspectos de diversos dialetos Lisp anteriores, incluindo Scheme. Foi proposto inicialmente o nome de "Standard Lisp" para a linguagem, mas em virtude de um dialeto Lisp já existir com este nome, se buscou um nome similar, resultando no nome "Common Lisp". Em 1994 foi publicada no padrão ANSI Information Technology - Programming Language - Common Lisp, registro X3.226-1994 (R1999). É bem maior e semanticamente mais complexa que Scheme uma vez que foi projetada para ser uma linguagem comercial e ser compatível com os diversos dialetos Lisp dos quais derivou. Como baixar, instalar e testar a Common Lisp no Windows? Embora exista uma quantidade enorme de compiladores Lisp disponíveis atualmente, minha pesquisa recaiu sobre o Steel Bank Common Lisp (SBCL), que pode ser baixado no endereço http://www.sbcl.org. No meu Windows 10 eu baixei o instalador sbcl-2.2.3-x86-64-windows-binary.msi, com o tamanho de 11.7Mb. Finalizada a instalação, vamos testar nossa distribuição do Bank Common Lisp (SBCL). Para isso, abra um janela de terminal e navegue até o diretório de instalação do SBCL: C:\Users\Osmar>cd C:\Program Files\Steel Bank Common Lisp Se você vir um arquivo sbcl.exe dentro deste diretório nós já temos a indicação de que tudo correu bem. Tudo que temos a fazer é chamar este arquivo na linha de comando: C:\Program Files\Steel Bank Common Lisp>sbcL Você verá as seguintes informações na sua tela: This is SBCL 2.2.3, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * Note que o cursor já está esperando comandos, uma vez que estamos no modo interativo. Assim, digite o seguinte comando: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- * (+ 5 (* 2 4)) Pressione Enter. Se você vir o valor 13, então é sinal de que o SBCL está funcionando 100% e já podemos prosseguir. Para sair do modo interativo do SBCL, digite: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- * (quit) Como escrever um programa em Common List e carregá-lo no SBCL Agora vamos ver como podemos escrever um programa Common Lisp, salvá-lo em arquivo e carregá-lo a partir do compilador Steel Bank Common Lisp (SBCL). Para isso, abra o seu editor de códigos favorito e digite a seguinte listagem: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; Este programa talvez seja um dos mais básicos ; que podem ser escritos em Common Lisp (defun Primeiro() ; Vamos mostrar uma mensagem de boas-vindas (write-line "Bem-vindo(a) à Common Lisp") ) ; Efetua uma chamada automática ao programa (Primeiro) Para executar este programa, basta chamar o SBCL pela linha de comando, da seguinte forma: C:\Program Files\Steel Bank Common Lisp>sbcl --script C:\estudos_common_lisp\Primeiro.lsp Se o seu código estiver correto, sem nenhum erro de sintáxe, você verá o seguinte texto: Bem-vindo(a) à Common Lisp Pronto! Agora é só aproveitar as nossas dicas, truques e exercícios resolvidos de Common Lisp para aprender ainda mais. Bons estudos. |
Veja mais Dicas e truques de Lisp |
Códigos Fonte |
![]() Diga adeus às planilhas do Excel e tenha 100% de controle sobre suas contas a pagar e a receber, gestão de receitas e despesas, cadastro de clientes e fornecedores com fotos e histórico de atendimentos. Código fonte completo e funcional, com instruções para instalação e configuração do banco de dados MySQL. Fácil de modificar e adicionar novas funcionalidades. Clique aqui e saiba mais |
![]() Tenha o seu próprio sistema de controle de estoque web. com cadastro de produtos, categorias, fornecedores, entradas e saídas de produtos, com relatórios por data, margem de lucro e muito mais. Código simples e fácil de modificar. Acompanha instruções para instalação e criação do banco de dados MySQL. Clique aqui e saiba mais |
Linguagens Mais Populares |
1º lugar: Java |