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

Дайте ответ используя логические операции запишите высказывания которые являются истинными при выполнении следующих условий 1) х у z равны между собой 2) каждое из чисел х у z положительно 3) хотя бы одно из чисел х у z отрицательно 4) хотя бы одно из чисел х у z не является положительным 5) только одно из чисел х у z не больше 10 6) ни одно из чисел х у z не равно 104 2. определите значения логических переменных а в с d если а) в и (марс- планета) - ложное высказывание б) с или (солнце - спутник земли) - истинное высказывание в) в и (1 литр молока дороже 1 кг сливочного масла) г) с или (масло дороже творога) - истинно.

👇
Ответ:
2) каждое из чисел х у z положительно
 ( x>0) ∧ (y>0) ∧ (z>0)
1) х у z равны между собой
   (x=y)∨ (x=z) ∨ (y=z)
3) хотя бы одно из чисел х у z отрицательно 
(x<0)∨ (z<0) ∨ (y<0)
4) хотя бы одно из чисел х у z не является положительным
(x<0)∨ (z>0) ∨ (y>0)
5) только одно из чисел х у z не больше 10
 (( x<=10) ∧ (y>10) ∧ (z>10)) ∨ ( ( x>10) ∧ (y<=10) ∧ (z>10)) ∨ ( ( x>10) ∧ (y>10) ∧ (z<=10))  
6) ни одно из чисел х у z не равно 104
¬(x=104)∧ (¬(y=104))∧( ¬(z=104))
ВТОРОЕ ЗАДАНИЕ ПРОВЕРЬ УСЛОВИЕ ЧТО-ТО В НЕМ НЕВЕРНО
4,6(79 оценок)
Открыть все ответы
Ответ:
tsukhaya
tsukhaya
18.05.2021
1)var a:array[1..4,1..4] of integer;
      i,j,s:integer;
begin
      for i:=1 to 4 do
         for j:=1 to 4 do 
               readln(a[i,j]);
         
           for i:=1 to 4 do begin 
                     writeln();
                   for j:=1 to 4 do begin 
                     write(a[i,j],' '); 
                    if (i+j>5) then s:=s+a[i,j];
                        end;
                 end;
writeln();
write(s);
end.

2)var a:array[1..4,1..4] of integer;
      i,j,s:integer;
begin
      for i:=1 to 4 do
         for j:=1 to 4 do 
               readln(a[i,j]);
         
           for i:=1 to 4 do begin 
                     writeln();
                   for j:=1 to 4 do begin 
                     write(a[i,j],' '); 
                    if (i>J) then s:=s+a[i,j];
                        end;
                 end;
writeln();
write(s);
end.
4,4(88 оценок)
Ответ:
azs194karelin
azs194karelin
18.05.2021
var  mas1, mas2: array[0..9] of integer;  t, k, i, j: integer; 
begin  
readln(t);  
readln(k);  
for j := 0 to 1 do  begin   
      if (j = 1) then writeln();        
                 for i := 0 to 9 do    begin      
                          if(j = 0) then begin       
                                  mas1[i] := random(100);        
                                    write(mas1[i], ' ');       
                                    if mas1[i] > t Then mas1[i] := mas1[i] + 4;      
                              end      
                            else 
                               begin       
                                      mas2[i] := random(100);        
                                      write(mas2[i], ' ');       
                                       if mas2[i] > 10 * K Then         
                                            mas2[i] := mas2[i] + K;      
                                end;    
                       end;       
                  for i := 0 to 9 do     
                         if (j = 0) then 
                               write(mas1[i]) 
                        else 
                                write(mas2[i]);    
               writeln();  
           end;  
readln();
end.

))
4,7(48 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ