Помогите пожалуйста работа в паскали составьте программу вычисления произведения четных чисел меньше 15
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.
Можно и любую другую букву
yt gjkexftnc
не получается *
что пишет?
одно значение получается
а сколько надо?
получается
произведение четных чисел 15 =645120
написано чисел
значит несколько