Решить: сколько существует различных комбинаций целых чисел a и b, чтобы выполнялось логическое равенство: (a > 5) /\ ¬(a > b) /\ ( (b < 7) \/ ¬(a + b > 15) = 1 ? (если можно поподробнее
(0..100).each {|a| (0..100).each {|b| if (a>5) and not (a>b) and ((b<7) or not (a+b>15)) then p [a,b] end } }
вывод
[6, 6] [6, 7] [6, 8] [6, 9] [7, 7] [7, 8]
Batishcheva
25.06.2020
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017 // Внимание! Если программа не работает, обновите версию!
begin var n:=ReadInteger('n='); if n>10 then begin Writeln('n>10'); Exit end; var a:=ReadArrInteger(n); Writeln(10*'-'); var b:=a.Where(k->k.IsEven or (k mod 13=0)).ToArray; var m:=0; for var i:=0 to b.Count-2 do for var j:=i+1 to b.Count-1 do if (b[i]*b[j]) mod 26=0 then begin Println(b[i],b[j]); m+=1 end; if m=0 then Writeln('NO') end.
Пример n= 6 29 38 16 39 41 7
38 39 16 39
vanvangog199826
25.06.2020
1. отметьте все правильно записанные формулы. =2*a3*b2 =a1+сумм(b1: c3) 2. отметьте все правильные адреса ячеек и диапазонов электронной таблицы. a5: b8 c7: b16 3. сколько ячеек входит в диапазон a7: b12? ответ: 12 4. в электронной таблице выделены 20 ячеек, расположенных в столбце h, начиная со строки 9. запишите адрес выделенного диапазона. ответ: h9: h28 5. в электронной таблице выделен диапазон из 8 ячеек, расположенный в столбцах a и b. правый нижний угол диапазона находится в ячейке b8. запишите адрес диапазона. ответ: a5: b8 6. в электронной таблице выделен диапазон из 9 ячеек, расположенный в столбцах c, d и e. правый нижний угол диапазона находится в ячейке e8. запишите адрес диапазона. ответ: c6: e8 7. какую формулу нужно записать в ячейку b5, чтобы вычислить значение x по формуле, на рисунке? ответ: 8. запишите адрес выделенного диапазона. ответ: 9. запишите адрес выделенного диапазона. ответ: 10. замените формулу, используя один вызов функции сумм:=a3+a4+a5+b3+b4+b5 ответ: =сумм(a3: b5) 11. замените формулу, используя два вызова функции сумм:=a3+a4+a5+b7+b8+b9+c7+c8+c9 ответ: =сумм(a3: c9)
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Решить: сколько существует различных комбинаций целых чисел a и b, чтобы выполнялось логическое равенство: (a > 5) /\ ¬(a > b) /\ ( (b < 7) \/ ¬(a + b > 15) = 1 ? (если можно поподробнее
Ruby 22
(0..100).each {|a|
(0..100).each {|b|
if (a>5) and not (a>b) and ((b<7) or not (a+b>15)) then
p [a,b]
end
}
}
вывод
[6, 6]
[6, 7]
[6, 8]
[6, 9]
[7, 7]
[7, 8]