var x: integer; y: real;
begin
readln(x);
If x<=-10 then
y:=x*x+25-x
else If (-10<x) and (x<=10) then
y:=3+x
else y:=1/x;
writeln(y);
end.
Var y:real; i:integer;
begin
y:=1;
for i:=1 to 52 do
y:=y*(i*i*i)/(i*i+1);
writeln('y = ',y);
end.
Результат:
y = 2.23632650309607E+67
Фотографии jpg занимают мало места , однако при сжатии теряется качество изображения!
1) <span>¬((x >3)→(x >4)) = ¬(¬(x>3)∨(x>4)) = ¬(x≤3 ∨ x>4) = (x>3) ∧ (x≤4)
Истинно для x ∈ (3;4]
<u>Ответ 4) 4</u>
2) </span><span>¬((x >56)→(x>198)) ∧(x<369) = ¬((x≤56)∨(x>198))∧(x<369) =
(x>56)∧(x<=198)∧(x<369) = </span><span>(x>56)∧(x<=198)
</span><span>Истинно для x ∈ (56;198]
<u>Ответ 1) 100</u>
</span>