Построить таблицу истинности для выражения a=> bv(c^a) ! )

А  в   с     (c^a)   bv(c^a)       a=> bv(c^a) 0   0   0     0         0            1         0   0   1     0         0           1 0   1   0     0         1           1 0   1   1     0         1           1 1   0   0     0         0           0         1   0   1     1         1           1 1   1   0     0         1           1 1   1   1     1         1           1 v - дизъюнкция(складываем) ^ - конъюкция (умножаем)последовательность действий - как в . сначала то, что в скобках, потом остальное.ну вт, как то так : )

var prost: array [1..100] of integer;   i, max, n, j: integer;   is_prost: bool; begin  max : = 99;   prost[1] : = 2;   n : = 1;   for i : = 2 to max do begin      is_prost : = true;       for j : = 1 to n do begin          is_prost : = is_prost and not (i mod prost[j] = 0);       end;       if is_prost then begin          n : = n + 1;           prost[n] : = i;       end;   end;   for i : = 1 to n do      if prost[i] > 9 then write(prost[i], ' '); end.

const  n = 99; var  p: array[2..n] of boolean;   i, pr: integer;   flag: boolean; begin  for i : = 2 to n do      p[i] : = true;   pr : = 2;   flag : = true;   while flag do  begin      i : = 2 * pr;       while i < = n do      begin          p[i] : = false;           i : = i + pr;       end;       flag : = false;       for i : = pr + 1 to n do          if p[i] then          begin              pr : = i;               flag : = true;               break;           end;   end;     for i : = 10 to n do      if p[i] then          write(i, ' ');   readln; end.моя быстрее работает : р