Создать блок схему по готовой программе из visual basic
sub pr1()
dim y as single, x as single, z as single, sum1 as single, sum2 as single, i as integer
i = 2
for x = 1.5 to 2.5 step 0.1
z = sin(x) * cos(x)
y = sqr(x + 1.7) - 0.5 * x
i = i + 1
if z < 1 then
sum1 = sum1 + z
end if
if y > 1 and y < 3 then
sum2 = sum2 + y
end if
sheets("лист1").cells(i, 1) = i
sheets("лист1").cells(i, 2) = y
sheets("лист1").cells(i, 3) = z
next x
sheets("лист1").cells(3, 4) = sum1
sheets("лист1").cells(3, 5) = sum2
end sub
1, 2, 3, 4
Объяснение:
Введем обозначения:
a = X > 0, b = X > 4
Тогда выражение будет иметь вид (a + b) → b и нужно найти условия, когда оно ложно. Вместо этого, мы будем искать, когда отрицание этого условия истинно, т.е. истинность ¬( (a + b) → b)
Для начала избавимся от импликации
¬( ¬(a + b) + b)
А теперь примерим к внешнему отрицанию закон де-Моргана
(a + b) · ¬b
Раскрываем скобки
a · ¬b + b · ¬b
a · ¬b + 0
a · ¬b
Делаем обратную замену
( X > 0) · ¬(X > 4)
( X > 0) · (X ≤ 4)
Переведем это на более понятный язык:
X > 0 И X ≤ 4, или
0 < X ≤ 4
Из целых чисел сюда подойдут 1, 2, 3, 4.