Question

Дано N чисел. Определить произведение четных по номеру чисел + блок-схему желательно

Answer 1

CLSINPUT NS = 1FOR i = 2 TO N STEP 2  S = S * iNEXT iPRINT S

Answer 2

я честно помогу

Answer 3

сейчас качаю паскаль нет

Answer 4

паскаль.net

Answer 5

var n,i,s:integer;
begin
readln(n);s:=1;
for i:=2 to n do
if i mod 2 = 0 then s:=s*i;
writeln(s);
end.

Answer 6

да молодец