Ответы
Ответ дал:
0
const a = 5.8; Pi = 3.14;var x, y, k, P, S, t: real;begin t := sqrt(sin(x - 4)); x := -3; while (x <= 3) do begin if (t < 5) then y := sin(Pi / 2 + x) / cos (Pi / 2 - x) else y := Ln(a + x) / Power(a, 2); if (y < 0) then k := k + 1; writeln('x = ', x, '; y = ', y);
x := x + 0.5;
end;
if (t >= 0) then
begin
P := P * t;
{Сюда вставить нужно вычисление S, я не понял, что значит тот знак:)}
end;
Writeln('k = ', k, '; P = ', P, '; S = ', S);
end.
x := x + 0.5;
end;
if (t >= 0) then
begin
P := P * t;
{Сюда вставить нужно вычисление S, я не понял, что значит тот знак:)}
end;
Writeln('k = ', k, '; P = ', P, '; S = ', S);
end.
Вас заинтересует
1 год назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад