Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.10.2014, 14:53   #1
Алена1996
Новичок
Джуниор
 
Регистрация: 19.10.2014
Сообщений: 1
По умолчанию Паскаль

Помогите,пожалуйста,составить на языке Паскаль программу вычисления заданной функции:
Заранее благодарю.
Изображения
Тип файла: jpg mYVweGzFVME.jpg (7.9 Кб, 143 просмотров)
Алена1996 вне форума Ответить с цитированием
Старый 19.10.2014, 15:05   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Код:
f:=exp(ln(x*x*x/4)*(1/5))+exp(1/4*ln(sqr(cos(x+1.5))));
Если не ошибаюсь.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 19.10.2014, 15:09   #3
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,629
По умолчанию

Код:
function power(const Base, Exponent: real): real;
begin
  power:= Exp(Exponent * Ln(Base));
end;

function f(const x: real): real;
begin
  f:= power(power(x, 3.0) / 4, 0.2) { корень 5 степени }
    + power(sqr(cos(x + 1.5)), 0.25); { корень 4 степени }
end;
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума Ответить с цитированием
Старый 19.10.2014, 15:16   #4
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Даешь FPC в массы!
uses Math;
WriteLn(2**3)
Poma][a вне форума Ответить с цитированием
Старый 19.10.2014, 15:23   #5
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,629
По умолчанию

даёшь васик!
а = б^ц
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума Ответить с цитированием
Старый 19.10.2014, 15:30   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Упс. В foxpro и ^ и ** прокатит
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль ABC. Программа на языке Паскаль. Helen1 Паскаль, Turbo Pascal, PascalABC.NET 6 13.01.2018 21:46
паскаль abc. Используя графические средства языка Паскаль на одной координатной сетке построить графики функций кириллюк Помощь студентам 5 15.09.2013 12:11
Как можно в Паскаль АВС (Паскаль-Турбо) вставлять в результаты печати программы графики, таблицы, схемы, набранные формулы, выраже IZOPGRAM Паскаль, Turbo Pascal, PascalABC.NET 0 11.06.2012 10:54
Паскаль, Борланд Паскаль-в чем разница??? Vremya-Dengy Паскаль, Turbo Pascal, PascalABC.NET 13 31.05.2011 18:23
паскаль и турбо паскаль Евгения Игоревна Помощь студентам 6 05.05.2011 14:31