Определите корни характеристического уравнения объекта описываемого дифференциальным уравнением второго порядка для того, чтобы переходный процесс находился на границе устойчивости: A.
отрицательные вещественные числа

B.
комплексно-сопряженное число с отрицательной вещественной частью

C.
комплексно-сопряженное число с положительной вещественной частью

D.
нулевые корни

E.
положительные вещественные числа

var

x,y: real;

begin

readln(x);

y: =7*sin(x)*sin(x)-0.5*cos(x);

writeln(y);

end.

for i : = 1 to length(s) do

begin

      res : = res + s[i];

      if i mod 2 = 0 then

            res : = res + s[i];

end;

writeln(res);

i : = pos(" ",s); {ищем первый пробел}

delete(s; i; 1); {удаляем первый пробел}

i : = pos(" ",s); {ищем второй пробел, котрый теперь первый}

writeln(s[i-1]); {выдаем знак который находится перед пробелом}

поправьте меня если ^ это не указатель стпени, но если это степень то вот просто:

var a,x: extended; n,i: longint; begin    read(x);     read(n);     a: =1;     for i: =1 to n do        a: =a*x;     writeln(a: 0: 0); end.

d: /лето/фото/125.jpg

d: /документы/экзамен/информатика