Здравствуйте) Помогите составить программу вычисления значений функции в VBA, заданных несколькими условиями с использованием условного оператора If.... Then.... Else... , никак не даётся(((

1
А во второй строке натуральный логарифм в кубе?
да

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

  • Sky09
  • профессор
2013-12-15T22:13:29+04:00
Uses crt;
var F:real;
    x,a:integer;
begin
     write('x:'); readln(x);
     write('a:'); readln(a);
     if (x>=0) and ((a>-1)or(a<2)) then f:=sqrt(x-sin(a))
     else
         if ((x>1)or(x<=3)) and (a<0) then f:=power(ln(13),3)-sqr(cos(x))
         else
             f:=(1+abs(x+a))/(ln(x-a));
     writeln(F);
end.
Ничего страшного=)
а в VBA сможешь? ну очень надооооо
Нет, не смогу, я не знаю VBA
спасибо и на этом=)
Да было бы за что...