Question

помогите пожалуйста
работа в паскали
составьте программу вычисления произведения четных чисел меньше 15

Answer 1

uses crt;
var p:integer;
begin
p:=1;
for var i:=1 to 14 do
if(i mod 2=0) then 
p*=i;   
writeln('произведения чётных чисел меньше 15= ',p);
end.

Answer 2

произведение четных чисел 15 =645120

Answer 3

написано чисел

Answer 4

значит несколько