Question

вычислить значение выражения составить блок схему и программу x-x^3/3+x^5/5

Answer 1

Ответ:

Program V1;

uses crt;

var x, y1, y2: real;

begin

clrscr;

write ('Введите значение x: x=');

readln (x);

if x=-1 then begin

write ('Нет решений');

end else

if x=0 then begin

write ('Нет решений');

end else

if x=1 then begin

write ('Нет решений');

end else begin

y1:=x+((sqr(x)*x)/3)+((sqr(x)*sqr(x)*x)/5)*(x+(sqr(x)/2))/x;

y2:=sqrt(x+1)-sqrt(x-1)*sqrt(x+1)-sqrt(x-1);

write ('Решение: y1=', y1, '; y2=', y2);

end;

readkey;

end.

Объяснение: