В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Алима20041
Алима20041
19.11.2021 18:58 •  Информатика

Сколько различных решений имеет система логических уравнений
(x1 ∧ y1) ≠ (¬x2 ∨ ¬y2)
(x2 ∧ y2) ≠ (¬x3 ∨ ¬y3)
...
(x5 ∧ y5) ≠ (¬x6 ∨ ¬y6)
где x1, …, x6, y1, …, y6, - логические переменные? В ответе не нужно перечислять все различные наборы значений переменных, при которых выполнено данное равенство. В качестве ответа нужно указать количество таких наборов.

Показать ответ
Ответ:
tchernia
tchernia
20.08.2020 22:34

#include <iostream>

#include <string>

using namespace std;

int main() {

   int N;

   cin >> N;

   int i = 100, count = 0;

   while (i <= 999) {

       string temp = to_string(i);

       if ((temp[0] - '0') * (temp[1] - '0') * (temp[2] - '0') == N) {

           cout << i << ", " << temp[0] << " * " << temp[1] << " * " << temp[2] << " = " << N << endl;

           ++count;

       }

       ++i;

   }

   cout << "Total: " << count;

}

0,0(0 оценок)
Ответ:
Yaklaura
Yaklaura
03.11.2021 22:36
// PascalABC.Net 3.0, сборка 1066

const
  n=5;
var
  a:array[1..n,1..n] of integer;
  x:array[1..n] of double;
  i,j,k:byte;
begin
  Randomize;
  Writeln('*** Исходный массив ***');
  for i:=1 to n do begin
    for j:=1 to n do begin
      a[i,j]:=Random(51)-25;
      Write(a[i,j]:4)
      end;
    Writeln
  end;
  Writeln('*** Массив x ***');
  for j:=1 to n do begin
    x[j]:=0; k:=0;
    for i:=1 to n do
      if a[i,j] mod 2=0 then begin
        x[j]:=x[j]+a[i,j]; Inc(k)
      end;
    if k>0 then x[j]:=x[j]/k;
    Write(x[j]:0:5,' ')
    end;
  Writeln
end.

Тестовое решение:
*** Исходный массив ***
 -10  18  -8 -15   5
 -21 -18   6  -2   9
  -7  22  -4   3  14
  21  16 -10 -18  -9
  17   3 -14 -18  12
*** Массив x ***
-10.00000 9.50000 -6.00000 -12.66667 13.00000
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота