Ответы
Ответ дал:
1
Ответ:
s:=1;
for i:=a to b do
if (i mod 2 <> 0) then
s:=s*i;
Объяснение:
var i,s,a,b: integer;
begin
readln(a,b);
s:=1;
for i:=a to b do
if (i mod 2 <> 0) then
s:=s*i;
writeln (s);
end.
если интервал большой возможно переполнение переменной s
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад