Упростить логическое выражение (все выражение не) ( X & не Y \/ Z) & Y \/ не Z

Знания

Информатика

1 ответ:

sinna [10]3 года назад

0 0

$\overline{(x\overline y+z)y+\overline z}=\overline{xy\overline y+yz+\overline z}=\overline{yz+\overline z}=\overline{y+\overline z}= \\ \overline yz=\lnot y\land z$

Читайте также

5) Исполнитель КАЛЬКУЛЯТОР имеет только две команды, которым присвоены номера: Объясните, пожалуйста, как сделать: 1. Прибавь 1

Татьяна Бражкина [2]

729 728 364 182 91 90 45 44 22 21 20 19 18 17
1 1 1 1 1 2 1 2 1 2 2 2 1

0 0

4 года назад

Решите плизз!!!!!!!;!

Марькай

Получше сфотай а так решу

0 0

4 года назад

Определить последнюю цифру заданного целого числа в pascal

MrAksel [222]

Var s,t:integer;
begin
write ('s='); readln(s);
if (s>-10) and (s<10)
then writeln ('Число однозначное')
else begin
t:=s mod 10;
writeln (abs(t));
end;
end.

0 0

4 года назад

Составьте программу вычисления выражения (разными способами, применяя каждый из операторов while,repeat,for) a^p, где p - целое

Ленчик Михайловна [1.6K]

1)Это с помощью while

var a,p,i,c:integer;
begin
readln(a);
readln(p);
c:=1; i:=0;
while i<p do
begin
    c:=c * a;
    inc(i);
end;
writeln(c);
readln;
end.

2) Это с помощью repeat

var a,p,i,c:integer;
begin
readln(a);
readln(p);
c:=1; i:=0;
repeat
    c:=c * a;
    inc(i);
until i=p;
writeln(c);
readln;
end.

3) Это с помощью for

var a,p,i,c:integer;
begin
readln(a);
readln(p);
c:=1;
for i:=1 to p do
    c:=c * a;
writeln(c);
readln;
end.

0 0

4 года назад

Решите пожалуйста. Срочно.

sh12054 [14]

1)2 2)3 3)1 4)3 вот как то так

0 0

3 года назад