+ Ответить в теме
Показано с 1 по 3 из 3

Тема: как писать в паскале корень квадратный в 3й степени

  1. #1
    Новичок langoler кто это?
    Регистрация
    02.04.2013
    Возраст
    35
    Сообщений
    1
    Поблагодарил(а)
    0
    Получено благодарностей: 0 (сообщений: 0).

    По умолчанию как писать в паскале корень квадратный в 3й степени

    Если есть кто живой, подскажите, пожалуйста, как в Паскале вводить корень в третьей степени.
    Т.е. нужно решить выражение :
    Wкорень)x2 +a - a2sin2 (х+b/2) и
    Y = cos3 * (x3 /3) - ( x/корень квадратный в 3й степени (a2+b2)) [IMG]file:///C:\DOCUME~1\User\LOCALS~1\Temp\msohtmlclip1\01\cli p_image008.gif[/IMG]
    При с=1.6, b=14.7, x=1.38

    Я написал:

    Var a, b, c, x, w, y:real
    begin
    c:=1.6;
    b:=14.7;
    c:=1.38;
    *writeln(‘Введите* значение для «а»’);
    readln (a);
    w:sqrt(sqr(x)+a)-(sqr(a)*sqr(sin)*(x+b)/2);
    * y:sqr(cos)*cos*(sqr(x)*x/3))-(x/{и вот тут у меня уже начинаются проблемы. Как писать корень в 3 степени?}
    *P.S.
    и если кто сможет, подскажите, почему паскаль в первом уравнение выдает ошибку предполагается ‘(‘ в значении синуса.

    там где выходят смайлики = (

  2. #2
    Почти гений eversor кто это? eversor кто это? Аватар для eversor
    Регистрация
    03.12.2007
    Возраст
    34
    Сообщений
    1,770
    Поблагодарил(а)
    52
    Получено благодарностей: 221 (сообщений: 149).

    По умолчанию

    сфтографируй задание и кинь сюда - будет проще.

  3. #3
    Наш Чел Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Anem Трогаюсь Аватар для Anem
    Регистрация
    15.10.2011
    Адрес
    Братск - центр
    Возраст
    33
    Сообщений
    326
    Поблагодарил(а)
    70
    Получено благодарностей: 27 (сообщений: 22).

    По умолчанию

    Y = cos3 * (x3 /3)= cos(x*x*x/3)*cos(x*x*x/3)*cos(x*x*x/3) Элементарно! самая интересная запись cos3 * (x3 /3) косинус от пустоты в третьей степени Хотел послать в гугл, но правилами запрещено, поэтому цитирую:
    В общем случае вас интересует
    z = x^y, где y=1/3
    но так как своей функции возведения в степень у паскаля нет (значок ^ именно возведение в степень), то ее можно математически переписать как
    ln z = y * ln x
    если теперь это является степенью экспоненты, то получим
    z = Exp(Ln z) = Exp(y* Ln x)
    так что можно ввести функцию
    function PowerFn (number, exponent: float): float;
    begin
    PowerFn := Exp(Exponent*Ln(Number));
    end;

    где Number - число, которое возводится в какую то Exponent степень

    вызываете ее как
    PowerFn(x, 1/3) и она возвращает корень третьей степени из x
    ну или
    uses crt;var i,k:integer; m:real;beginwriteln('Введите К');readln(k);if k<0 then m:=-1*exp(ln(abs(k))*1/5) else m:=exp(ln(abs(k))*1/5);writeln(m);end.
    ну и как итог
    exp(ln(x)/3)

+ Ответить в теме

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

     

Похожие темы

  1. Пара заданий на паскале.
    от santalix в разделе Delphi/Pascal
    Ответов: 0
    Последнее сообщение: 11.12.2012, 05:42
  2. Помогите с программой на паскале
    от santil в разделе Delphi/Pascal
    Ответов: 8
    Последнее сообщение: 14.10.2012, 16:30
  3. Куплю монитор жК 17 дюймов. квадратный.
    от myasso в разделе Компьютеры и оргтехника
    Ответов: 0
    Последнее сообщение: 01.10.2010, 14:55
  4. Нарушение пользователю N1k$oN: В корень офигел
    от Diesel в разделе Нарушения, предупреждения, жалобы
    Ответов: 0
    Последнее сообщение: 05.11.2007, 23:59

Метки этой темы

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
Рейтинг@Mail.ru
Администрация сайта не выражает согласия
с высказыванием участников форума и не несет
ответственности за их содержание.

Копирование любого материала возможно только
при наличии ссылки на сайт.