Программа которая выводит произведение чисел от 5 до 10?

Решаю на PascalProgram umn;vara,b,c,d,e,f,g: integer;begina:= 5;b:= 6;c:= 7;d:= 8;e:= 9;f:= 10;g:= a*b*c*d*e*f;writeln('Произедение чисел от 5 до 10 = ',g);end.