Помогите пожалуйста . паскаль . составьте программу нахождения произведения нечётных чисел 3•5•7...•13
Program aaa;Var x,s: integer;Begins:=1;For x=3 to 13 doIf x mod 2=1 thens=s*x;WriteLN('Произведение равно ', s);End.
пишет ошибку (for)