Скласти алгоритм знаходження добутку цілих непарних чисел від 1 до 100

составить алгоритм нахождения произведения целых нечетных чисел от 1 до 100.

извини, я на украинском не могу)

буду приводить аналогию на паскале.

в основе будет лежать "двойной" цикл. (for i: =1 to 100 do for j: =1 to 100

в первом цикле мы проверяем делится ли "i" на 2 (if i mod 2=0).

если да(четное), тогда берем след число. если нет(нечет), то запускаем второй цикл:

(for j: =1 to 100)

в нем мы тоже проверяем число на нечетность. если число нечетное, тогда у нас есть уже 1ое произведение! "i" - это первый множитель. "j" - второй. i*j - само произведение. его можно вывести на экран (writeln(i*

получается мы берем по-порядку каждое число от 1 до 100,   если оно нечетное, тогда по очереди умножаем его на каждое нечетное число, опять же, от 1 до 100.

на паскале:

for i: =1 to 100 do

  if i mod 2< > 0 then

  for j: =1 to 100 do

    if j mod 2< > 0 then writeln(i*j);

могут встречаться повторы (3*9 и 9*3)

таблица истинности выражения a → b

а |  b | a → b

0  i  0 |      1

0  i  1 |      1

1  i  0 |      0

1  i  1 |      1

теперь пример: ¬((x> 3)  → (x> 4))

при х = 1: ¬((1> 3)  → (1> 4))= ¬((0)  → (0))=¬(1) = 0,т.е.(1> 3)=ложь(> 4)=ложь(0), а ложь(0) → ложь(0) = истина (1), а отрицание лжи (0) = истина(1)

при х = 2: ¬((2> 3)  → (2> 4))= ¬((0)  → (0))=¬(1) = 0

при х = 3: ¬((3> 3)  → (3> 4))= ¬((0)  → (0))=¬(1) = 0

при х = 4: ¬((4> 3)  → (4> 4))= ¬((1)  → (0))=¬(0) = 1

ответ. х=4.

program xxx;

    var i, n : integer;

                      s : real;

                    a : array [1..20] of real;

begin

  writeln('введите размерность массива n=');

  readln(n);

  write('введите элементы массива а: ');

  for i: =1 to n do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to n do

        writeln(a[i]);

  s: =0;

  for i: =1 to n do

      if a[i] mod 2 = 0 then s: =s+a[i];

  writeln('сумма четных элементов =', s);

  readln

end.