Составить алгоритм вычисления произведения 6 чисел введённых с клавиатуры
Помогите пожалуйста!

program mnogohodovochka;vara,b,c,d,e,f:integer;beginwriteln('vvedite 6 chisel');readln(a,b,c,d,e,f);writeln('proizvedenie= ', a*b*c*d*e*f);end.