Exercicio 5 capitulo 3

Escreva um algoritmo que lê dois números inteiros e informa se o primeiro é múltiplo do
segundo.

algoritmo "Exercicio 3.5"
// Função :
// Autor :  Gustavo Quirino
// Data : 19/9/2010
// Seção de Declarações
var
   num1,num2,resto:real
inicio
   escreval("Informe o primeiro número:")
   leia(num1)
   
   escreval("Informe o segundo número:")
   leia(num2)
   
   se (num1>0)entao
      resto<- num1 mod num2
   senao
      resto<- num2 mod num1
   fimse
   
   se (resto>0)entao
      escreva("Não é múltiplo")
   senao
      escreva("É múltiplo")
   fimse
fimalgoritmo