3. Построить таблицу истинности для следующих формул

(AVB)& (AVC)

x& y-> (x v y -> z)

x -> y -> x v y& z.

4. Упросить следующие формулы

xvx&y;

x -> (x -> y);

(x V y)& (xV y);

5. Составить формулу, определяющую функции F1, F2, F3, по таблице

Появится верхнем в левом углу

Объяснение:

Инструмент Копирование используется для копирования выделенного объекта в программе Paint. Это удобно, если на картинке нужно увеличить количество одинаковых линий, фигур или фрагментов текста.

На вкладке Главная в группе Изображение щелкните Выделение и перетащите указатель, чтобы выделить область или объект, который нужно скопировать.

В группе Буфер обмена щелкните Копировать (комбинация Ctrl + C).

В группе Буфер обмена щелкните Вставить (комбинация Ctrl + V).

Когда объект выделен, переместите его на новое место на изображении.

1)x = (input('x= '))

y = (input('y= '))

z = (input('z= '))

c = ((x % 3 == 0) and (y % 3 == 0) and (z % 3 == 0))

print(

else:

print

2)uses crt;

var x,y:real;

   f1,f2:boolean;

begin

clrscr;

writeln('Введите 2 числа:');

readln(x,y);

f1:=(x>2)and(y>3);

f2:=(x>1)and(y>-2);

writeln(f1);

write(f2);

readln

end.

3)uses crt;

var a,r:real;

begin

clrscr;

write('Введите сторону квадрата и радиус круга-> ');

readln(a,r)

if sqr(a)>pi*sqr(r) then write('У квадрата') else write('У круга');

readln;

end.

5)uses crt;

Var a, i, n, S: integer;

Begin

Write('Vvedite n '); readln(n);

S:=0;

For i:=40 to 140 do

 begin

 read(a);

 if (a mod 6 =0) then S:=S+a;

 end;

Writeln(S);

End.