Что выдаст программа по окончании ее выполнения? a=15
b=25
c=45
if a>c and c b: print (a)
if a>b or c

напиши само ,я

решаем относительно  a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4.

ошибка в том что натуральный логарифм (-1) не существует

program summa; uses crt; var n,i: integer; s: real;

p1,p2: integer; begin clrscr; writeln ('vvedite n'); readln (n); s: =0;

p1: =-1;

p2: =2; for i: =1 to n do

begins: =s+p1/p2;

p1: =-p1;

p2: =p2*2;

end; writeln ('s=', s); readln; end.

var x,y: integer;

begin

readln(x);

if x< 1 then y: =-2*x+11

else y: =x*x-2;

writeln(y);

end.