28 - lista 3 11 - soma2

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

principal:-
	write('digite um valor'),
	read(N1),
	write('digite um valor'),
	read(N2),
	soma(N1,N2,R),
	write('soma = ':R).
soma(N1,N2,S):-
	S is N1+N2.