Элементами множества А являются натуральные числа. Известно, что выражение

¬(x ∈ {2, 4, 6, 8, 10, 12}) \vee (¬(x ∈ {3, 6, 9, 12, 15}) →(x ∈ A))

истинно (т. е. принимает значение 1) при любом значении переменной х.

Определите наименьшее возможное значение произведения элементов множества A.

вроде бы 100*100=10000 бит=1250 байта

ну вроде "алгоритм" переходит в "терминал", хотя по буквам не получается - только последние 5 нормально встают и то, если в алфавите нет ё и й

s : = 0

for i : = 1 to n do

  if i mod 2 = 1 then

      s : = s - 1/2/n

  else

      s : = s + 1/2/n;

var

s,s1: real;

k: integer;

begin

s: =10;

k: =1;

while s< 20 do

begin

s: =s*1.1;

k: =k+1;

end;

writeln('в ', k,' день он пробежит 20 км');

s: =10;

s1: =10;

k: =1;

while s< 200 do

begin

s: =s+s1*1.1;

s1: =s1*1.1;

k: =k+1;

end;

writeln('в ', k,' день суммарный пробег превысит 200 км');

end.