можно чуть больше картинку? здесь не очень хорошо видно.
а вы нажмите на изображение, чтобы открыть его
я не тупая) просто мелкие символы, вроде степени, не видно.

Ответы и объяснения

2013-12-01T09:04:54+00:00
Program pr;
uses crt;

Var a,b,c,s,k,y:real;

Begin
Writeln('Введите a,b,c');
readln(a,b,c);
s:=sqrt(a+exp(3*ln(b)))/(3*c);
k:=s-sqrt(abs(a*b*c));
y:=s+k-3/(b*c);

Writeln('y=', y);

readln;
end.


Качество изобразения плохое. так, что могут быть ошибки в формулах.
выдаёт ошибку потому, что a+b^3 = 3 + -2^3 = -5 а корень из минуса не бывает
и что делать.. там напиcано, что b=-2
скорее всего степень не 3
точно должно получиться -13,8305, даже с другой степенью на калькуляторе не получается , это с условием чтото
да, должно так получаться.... брееед
  • Sky09
  • профессор
2013-12-01T09:59:17+00:00
Uses crt;
var s,k,y:real;
     a,b,c:integer;
begin
     readln(a,b,c);
     if a+power(b,3)<0 then writeln('ERROR: Отрицательное число под корнем')
     else
     begin
          s:=sqrt(a+power(b,3))/(3*c);
          k:=s-sqrt(abs(a*b*c));
          y:=s+k-3/(b*c);
          writeln(y);
     end;
end.
Хоть строки с ошибкой в блок-схеме и нету, но без нее программа не будет работать исправно для всех a,b,c.