Для какого из значений числа y высказывание (y < 5) & ((y > 1) -> (y > 5)) будет истинным? 1) 1 2) 2 3) 3 4) 4

Выражение ((y > 1) -> (y > 5)) можно переписать как ! (y> 1) v (y> 5), т.е. (y≤1) v (y> 5), следовательно y∈(-∞; 1] v (5; +∞) выражение y< 5 инстинно при y∈(-∞; 5) все выражение будет истинно, когда истинны оба рассмотренные выше подвыражения, тогда условия следует объединить. y∈(-∞; 1] из перечисленных вариантов подходит только 1

//pascalabc.net версия 3.2, сборка 1389 //если программа не запускается, то обновите версию begin       var a : = seqwhile(1, i -> i + 1, i -> i < 20);       println(a);       println(a.where(x -> x mod 3 = 0).average);       writeln();             for var i : = readinteger('a =') to readinteger('b =') do               writeln(i, ' ', i * i, ' ', i * i * i); end.

Var c: array[1..18] of integer; i,p,s,k: integer; beginp: =1; for i: =1 to 18 do beginc[i]: = random(10)-5; write(c[i]: 4); if c[i] = 0 then k: = 1; if k = 0 then p: = p * c[i]else s: = s + c[i]; end; writeln; write('произведение = ',p , ' сумма = ',s); end. var c: array[1..30] of integer; i,max,q: integer; beginfor i: =1 to 30 do beginc[i]: = random(100)-50; write(c[i]: 4); if c[i] > max then  begin  max: = c[i]; q: =i; end; end; writeln; c[q]: = 0; for i: =1 to 30 dowrite(c[i]: 4); end.