function [] = prog1main()
s=input('enter 1.Spalte von Q bitte ')
if (length(s)<=0)
    break;
end

z=input('enter 1.Zeile von Q  bitte')
if (length(s)~=length(z))
    break;
end

x=input('enter X bitte ')
if (length(x)~=length(z))
    break;
end  

sums=0;
sumz=0;

for i=1 : length(s) 
    sums=sums+s(i)*x(i);
    sumz=sumz+z(i)*x(i);
end

disp('Ergebniss von Aufgabe 1:')
disp(sums*sumz/s(1))


a=[1,5,8,0,2,6,9,3,7,4];
xx=input('enter X von Aufgabe 2 bitte ')
y(1:4)=0;
for i=1:4
    y(i)=a(i)*xx(i);
end    
l=4+1;
for k=1 : 3
    for j=1:(4-k)
         y(j)=y(j)+a(l)*xx(j+k);
         y(j+k)=y(j+k)+a(l)*xx(j);
         l=l+1;
     end
 end

 disp('Ergebniss von Aufgabe 2:')
 disp(y)
  


    


