20160608_procedimento_4.alg

algoritmo "20160608_procedimento_4"
// Função :
// Autor :
// Data : 12/06/2016
// Seção de Declarações
var
a, b, resposta:inteiro

procedimento soma (x,y : inteiro; var res : inteiro)
inicio
res <- (x+y)
fimprocedimento

inicio
leia(a, b)
soma(a, b, resposta)
escreval(resposta:1)
fimalgoritmo