1.35
2.var y,x:real;
begin
read(x);
if x<=-1 then
y:=-(1/sqr(x))
else if (x>-1) and (x<=-2) then
y:=sqr(x)
else if x>2 then y:=-4;
print (y);
end.
Cхему думаю составишь сам уже
begin
// 1
var N := ArrRandom(70, 1, 45);
N.Println;
N.Where(p -> p < 10).Aggregate(BigInteger(1), (p, q) -> p * q).Println;
// 2
var M := ArrGen(45, p -> Sqrt(p) / 45, 1);
M.Println
end.
Ответ:
<span>В.появление сложных внешних устройств и необходимость разделения ресурсов между задачами и пользователями</span>
1) 136:4+х=257
39+х=257
х=218
2) а+884:4=570
а+221=570
а=349
3) у-125:5=800
у-25=800
у=825
4) 147:7×в=210
21в=210
в=10