Решить задачУ "Составьте программу, которая вычисляет произведение натуральных чисел от 5 до 10 и выводит на экран результат" в PascalABC
var a, i: integer;
begin a := 1; for i := 5 to 10 do a := a * i; writeln (a); end.