function y=outp(x,h,r)
N=length(x);
for i=1:N,
    a(i,:)=[zeros(1,(i-1)*r),x(i),zeros(1,(N-i)*r)];
     p(i,:)=conv(a(i,:),h);
end;
y=sum(p,1);
t=1:length(y);
figure;
plot(t,y);