Для перехода к слайду нужнo b) apply to all sides
Условные обозначения:
not(x)=не(х)
\/ = +
/\=*
1) F=(x+z)*(x+not(z))*not(y)={можем раскрыть скобки точно так же, как в обычной алгебре}=(x*x+x*not(z)+z*x+z*not(z))*not(y)={применяем закон идентичности, исключающего третьего, свойства констант}=(x+x(not(z)+z)+0)*not(y)=(x+x*1)not(y)=(x+x)*not(y)=x*not(y);
2) F=(x+z)*(x+not(z))*not(y)={можем сразу воспользоваться законом дистрибутивности}=(x+z*not(z))*not(y)=(x+0)*not(y)=x*not(y).
Фрагмент программы
for i:=1 to 4 do
writeln(i*i);
на экране монитора увидим четыре числа каждое с новой строчки
1
4
9
16
Program zadanie;
const lmax=10;
var n,i:integer; a:array [1..lmax] of integer; n1:real; flag: boolean;
begin
repeat
writeln('Введите длину массива меньше ',lmax);
read(n1);
until (n1>0) and (n1<=lmax) and (n1=round(n1));
n:=round(n1);
writeln('Введите целые элементы массива');
for i:=1 to n do
begin
repeat
read(n1);
if (n1<>round(n1)) then writeln('Введите ЦЕЛЫЙ элемент');
until (n1=round(n1));
a[i]:=round(n1);
end;
flag:=false;
i:=0;
repeat
i:=i+1;
if (a[i]mod 2=0) then
begin
flag:=true;
writeln('Номер первого четного элемента - ',i);
end;
until flag or (i=n);
if (flag=false) then writeln('0')
end.
<span>ниже описаны шаги
1- D:\Фото\Соревнования\
2- </span><span>D:\Фото\
3- </span><span>D:\Фото\Тренировки\
4- </span><span>D:\Фото\Тренировки\Баскетбол\.
ответ 4</span>
