profile
Опубликовано 6 лет назад по предмету Информатика от DenisGolov

Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. (Turbo Pascal) а так же блок-схему ( необязательно)
Буду очень благодарен!
Заранее спасибо.

  1. Ответ
    Ответ дан iolandavalerypad353
    function Foo(x: real): real;
    begin
       if (-9 <= x) and (x <= -5) then
          result := 2 - Sqrt(4 - Sqr(x + 7))
       else if (-5 <= x) and (x <= -4) then
          result := 2
       else if (-4 <= x) and (x <= 0) then
          result := -(1 / 2) * x
       else if (0 <= x) and (x <= Pi) then
          result := Sin(x)
       else if x >= Pi then
          result := x - Pi;
    end;

    var
        x: real;

    begin
       writeln('x =');
       readln(x);
       if x < -9 then
       begin
          writeln('функция не определена в этой области');
          exit
       end
       else Writeln('y = ',Foo(x));
    end.
    1. Ответ
      Ответ дан DenisGolov
      Можете еще раз написать программу?
      Эту задачу нужно решить в кратчайшие сроки тобишь сегодня.
      Простите еще раз что не указал.
    2. Ответ
      Ответ дан iolandavalerypad353
      В следующий раз пиши в какой IDE: FPC, PascalABC.NET
    3. Ответ
      Ответ дан iolandavalerypad353
      Не могу изменить ответ почему то, почему ты знаешь?
    4. Ответ
      Ответ дан DenisGolov
      Изменить не можешь потому-что надо заново писать ответ.
    5. Ответ
      Ответ дан iolandavalerypad353
      и ответить не могу, нет поля для ввода
Самые новые вопросы