Составьте программу, которая вычисляет произведение натуральных чисел от 5 до 10 и выводит на экран результат

var a, i : integer; \\\\ где a — это определённое натуральное число в цикле (изначально равно 1), а i — счётчик.begincls;a := 1;for i := 5 to 10 do a := a * i;writeln (\'Произведение всех натуральных чисел от 5 до 10 принимает значение, равное \', a, \'.\');end.