Постройте таблицу истинности a ∧ ¬ c ∨ c ∧ (b ∨ ¬ c) ∨ (a ∨ ¬ b) ∧ c . заранее !

Ab c = 0 0 0 0 0 1 0 0 1 1 2 0 1 0 0 3 0 1 1 1 4 1 0 0 1 5 1 0 1 1 6 1 1 0 1 7 1 1 1 1 def bin_values(in_int):       ret = []       b = bin(in_int)[2: ]       while len(b) ! = 3:               b = '0' + b       for i in b:               ret.append(bool(int(       return ret for xs in range(2**3):       a, b, c = bin_values(xs)       print(xs)       res = a and not c or c and (b or not c) or (a or not b) and c       print(int(a), int(b), int(c), int(res), "\n")

используется язык pascal

program pr;

var

  mas: array[1..7] of integer;

  i: integer;

begin

writeln('вводим значения в массив');

  for i: =1 to 7 do readln (mas[i]);

writeln('выводим значения из массива');

  for i: =7 downto 1 do writeln(mas[i]);

readln;

end;

1.

var n: integer; begin  cls;   for n: =1 to 10 do begin    write('n=',sqr(n)+5,' ');   end; end.

 

решить на паскале?