Найти значение переменной Р. ...
p:=1;
For i:=3 to 5 do
p:=p*(2*i);
write(p);
Найти значение переменной S.
...
i:=2;
s:=0
;while i<=8 do
begin
s:=s+s/2;
i:=i+2;
end;
write(s);
p:=1;
For i:=3 to 5 do
p:=p*(2*i);
write(p);
Найти значение переменной S.
...
i:=2;
s:=0
;while i<=8 do
begin
s:=s+s/2;
i:=i+2;
end;
write(s);