М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
DashaZakh
DashaZakh
28.10.2021 07:58 •  Информатика

1.соедините правильные определения или обозначения: 1. логика 1. а→в 2. высказывание 2. логическое сложение 3. логики 3. наука о формах и мышления 4. логическая константа 4. логическое отрицание 5. дизъюнкция 5. истина и ложь 6. инверсия 6. а ↔ в 7. конъюнкция 7. ^ 8. импликация 8. наука об операциях над высказываниями 9.эквивалентность 9. повествовательное предложение, в котором что-либо утверждается или отрицается. прямо на уроке

👇
Ответ:
Картоон
Картоон
28.10.2021
1. логика - 3. Наука о формах и мышления

2. Высказывание - 9. Повествовательное предложение, вкотором что-либо утверждается или отрицается.

3. Алгебра логики - 8. Наука об операциях над высказываниями

4. Логическая константа - 5. ИСТИНА и ЛОЖЬ

5. Дизъюнкция - 2. Логическое сложение

6. Инверсия - 4. Логическое отрицание 

7. Конъюнкция - 7. ^

8. Импликация - 1. А→В

9.Эквивалентность - 6. А ↔ В
4,6(86 оценок)
Открыть все ответы
Ответ:
Жебир
Жебир
28.10.2021
//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
uses System.Linq;
begin
    writeln('III');
    var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;
    writeln;
    
    while a.Any() do
    begin
        write(a[0], ' ');
        a.RemoveAt(0);
        if not a.Any then break;
        
        write(a.Last, ' ');
        a.RemoveAt(a.Count - 1);
        if not a.Any then break;
        
        var n := 0;
        if a.Count > 1 then n := a.Count div 2 - 1;
        write(a[n], ' ');
        a.RemoveAt(n);
    end;
end.
4,5(12 оценок)
Ответ:
Kmamsmajfkf
Kmamsmajfkf
28.10.2021
// PascalABC.NET 3.3 
 var c:array of real;
begin
  Writeln('1 матрица:');
  var m:=ReadInteger('m =');
  var n:=ReadInteger('n =');
//  var a:=ReadMatrReal(m,n);
  var a:=MatrRandomReal(m,n,-3,7).Println(6);
  Writeln('2 матрица:');
  var k:=ReadInteger('k =');
  var l:=ReadInteger('l =');
//  var b:=ReadMatrReal(k,l);
  var b:=MatrRandomReal(k,l,-3,7).Println(6);
  var s1:=a.ElementsByRow.TakeWhile(x->x>=0).Sum;
  writeln('s1 = ',s1);
  var s2:=b.ElementsByRow.TakeWhile(x->x>=0).Sum;
  writeln('s2 = ',s2);
  if s1>s2
   then begin
    c:=ArrFill(a.GetLength(1) div 2,0.0);
    foreach var j in SeqWhile(1,x->x+2,x->x<a.GetLength(1)) do
      c[(j-1) div 2]:=a.Col(j).Average;
   end
   else begin
    c:=ArrFill(b.GetLength(1) div 2,0.0);
    foreach var j in SeqWhile(1,x->x+2,x->x<b.GetLength(1)) do
      c[(j-1) div 2]:=b.Col(j).Average;
   end;
   writeln('Полученный массив:'); c.Println;
   Sort(c);
   writeln('Отсортированный массив:'); c.Print;
end.

Пример:
1 матрица:
m = 3
n = 6
  0.38  4.94  1.57 -2.49  6.67  2.50
  2.97 -1.44 -1.44  0.42  4.04 -2.54
  5.18  0.32 -1.90 -0.09  3.79  0.12
2 матрица:
k = 2
l = 7
  4.92  2.57  3.57  3.05  2.62  5.29  6.17
  6.62  2.17  5.80  1.31  2.55 -2.75  4.91
s1 = 6.88926995447337
s2 = 46.640484614596
Полученный массив:
2.37028874986353 2.18293672249789 1.26664565655712
Отсортированный массив:
1.26664565655712 2.18293672249789 2.37028874986353
4,4(77 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ