Упростие логические функции:

Знания

Информатика

1 ответ:

Polinabuzhinaeva4 года назад

0 0

Эти функции нельзя просто так сократить, надо для каждой состовляетть таблицу истинности, затем только используя определения логических функций сокращать их.
Это не ответ, но как подсказка думаю сойдёт.

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

Даны 2 переменные целого типа А и В. Если их значение не равны , то присвоить каждой переменной сумму этих значений, а если равн

Марина Новоселова

Блок-схема - в прилагаемом файле. Программа на паскале:
var a,b:integer;
begin
write('a = ');
readln(a);
write('b = ');
readln(b);
if a<>b
then begin a:=a+b; b:=a; end
else begin a:=0; b:=0; end;
writeln('a = ',a,' b = ',b);
end.

Пример:
a = 2
b = 5
a = 7 b = 7

0 0

4 года назад

Программа на паскале и блок схему 7) Вычислить последовательность значений функции y=7x^3+14x/3-6, где x принадлежит промежутку

Igor 1305

//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

var m:=readinteger('m='); var y:=0.0; var x:=1.0;

for var i:=1 to m do

begin

y:=7*x**3+14*x/3-6;

x:=i+0.2;

writeln('y=',y:0:4,' ','x=',x);

end;

end.

0 0

4 года назад

Составьте программу,находящую сумму квадратов первых N чисел.Используя цикл с предусловием, там for...do...else...then...

Светуля Александр...

For(i = 0; i < N; i++)
{
sum += a[i] * a[i];
}

0 0

3 года назад

Составьте программу которая выводит на экран нечетные числа от 1 до 50 в порядке убывания c циклом While

Рулик333 [13]

var
n: <em>integer </em>:= 50;

begin
if (n mod 2 = 0) then
dec(n);

while (n >= 1) do
begin
writeln(n);
n -= 2;
end;
<span>end.</span>

0 0

4 года назад

Носитель информации имеет объем 1 Гбайт. Сколько Мбайт памяти останется свободно, если разместить на нем 16 книг, состоящих из 2

Виктор4863

982.05696 мегабайт останется

0 0

4 года назад