Составить программу вычисления произведения нечётных чисел меньши 16

упс, ошибка, но она не критичная, просто замени знак "+" на "*"

поставь в начале программы после begin sum:=1;

var n:byte;sum:integer;begin n:=16; sum:=1; repeat dec(n); if (n mod 2)=0 then continue; writeln(n); sum:=sum*n; until n=0; writeln(sum);end.

прошу прощения за предоставленные неудобства