Пожалуйста поставь 5 звёзд и лайк, я очень старался
Актуальность разработки данной проблемы обусловлена тем, что государственная информационная политика (ГИП), ее формирование и реализация на современном этапе доктринально и насущно выдвигаются на передний план политики российского государства.
Program Proizved;
var i, a, b, rez : integer;
begin
write('введите начало диапазона ');
readln(a);
write('введите конец диапазона ');
readln(b);
rez:=1;
for i:=a to b do
if (i mod 2)<>0
then rez:=rez*i;
i:=i+1;
writeln('Произведение нечетных чисел диапазона = ', rez);
end.
Var s,h:integer;
begin
a:=5;
for x:=2 to 9 do writeln(x,'x',a,'=',x*a);
end.