построим таблицу истинности данного выражения
поскольку переменных две, то в таблице будет 4 строки
столбцов будет тоже два (2 переменные +2 операции)
А В НЕ(В) А ИЛИ НЕ (В)
0 0 1 1
0 1 0 0
1 0 1 1
1 1 0 1
ОТВЕТ количество наборов, при которых логическое выражение
А ИЛИ НЕ (В) будет истинным равно 3.
можно снять какой нибудь смешной сюжет
или страшилку
Приведу часть программы.
n-любое число
...........................
a: array[1..n] of integer;
................................
K:=0;
for i:=1 to n do
if a[i]=1958 then inc(k); {или K:=k+1}
writeln(k);
end.
Program Primer;
var
i: Integer;
b:Boolean;
begin
Write('Введите число: ');
ReadLn(i);
if ((i<-99) and (i>-1000)) or ((i>99) and (i<1000))
then b:=true;
WriteLn(b);
end.
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (x,n):=ReadInteger2('x,n =');
var ans :=1;
while (n > 0)do
begin
ans*=x; dec(n);
end;
Writeln(ans);
end.
<u>Пример:</u>
x,n = 2 10
1024