Ir ao conteúdo

Posts recomendados

Postado

Escreva um programa que pergunte ao usuário dois números e diga se o primeiro é divisível pelo segundo ou não.

var
a,b :inteiro
inicio
escreval("indique dois números")
leia(a,b)
se a % b = 0  então
escreval(,a,"é divisível por ",b)
senao
escreval(,a,"não é divisível por ",b)
fimse
// Seção de Comandos 
fimalgoritmo

 

não aparece o escreva no comando

  • Curtir 1
  • Moderador
Postado

@Gabriel Jansen

Você não pode ler dois valores ao mesmo tempo, sem o elemento ser um vetor e percorre-lo.

 

No seu caso declare  o leia duas vezes.

escreval("indique o número 1")
leia(a)

  escreval("indique o número 2")
leia(b)

 

  • Curtir 1
Postado

@Gabriel Jansen    você colocou uma virgula dentro do parenteses no escreval  antes da variável e isso não permite que esse comando funcione, veja como ficaria seu código com algumas modificações :

Algoritmo "divisivel"
  var
    a,b :inteiro
  inicio
    escreval("indique dois números")
    leia(a,b)
    se a % b = 0  então
      escreval(a," é divisível por ",b)
    senao
      escreval(a," não é divisível por ",b)
    fimse
fimalgoritmo

 

  • Curtir 1
Visitante
Este tópico está impedido de receber novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

LANÇAMENTO!

eletronica2025-popup.jpg


CLIQUE AQUI E BAIXE AGORA MESMO!