написать Функцию в Pascal - Pascal

Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.60/5:

@hranitely 0 / 0 / 0 Регистрация: 12.02.2010 Сообщений: 3
		1
	написать Функцию в Pascal 13.02.2010, 16:27. Показов 1013. Ответов 1 Метки нет (Все метки) 0

Заказать работу у эксперта

Лучшие ответы (1)

Сообщение: #541701

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

13.02.2010, 16:27

Ответы с готовыми решениями:

Pascal. Написать функцию, которая вычисляет среднее арифметическое отрицательных элементов массива
Написать функцию , которая вычисляет среднее арифметическое отрицательных элементов масива

Написать функцию, проверяющую правильность имени в языке Pascal
Написать функцию, проверяющую правильность имени в языке Pascal.

Написать функцию, которая, в зависимости от выбора пользователя вызывает соответствующую функцию
Помогите, что то я не могу понять задачи, даже не знаю с чего начать)))) 5. Написать функцию,...

Написать функцию. которая аргументом принимает тип происшествия и возвращает функцию
Написать функцию. которая аргументом принимает тип происшествия и возвращает функцию, которая...

yanyk1n

4342 / 1474 / 680

Регистрация: 12.03.2009

Сообщений: 5,310

13.02.2010, 16:36

Сообщение было отмечено hranitely как решение

Решение

В случае недопустимого значения ф-ция вернет -1:

Pascal

var x,y:real;
function f(x:real):real;
begin
 if x>0 then f:=1/exp(2*ln(x))*sqrt(x+sqrt(sqrt(abs(x)))) else
 if x=0 then f:=0 else if x>=sqrt(sqrt(abs(x))) then f:=exp(2*ln(-x))*sqrt(x+sqrt(sqrt(abs(x)))) else f:=-1; 
end;
begin
 write('X-> ');
 readln(x);
 if f(x)<0 then writeln('Недопустимое значение!') else writeln('Y=',y:0:3);
 readln;
end.

	13.02.2010, 16:36

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

13.02.2010, 16:36

Помогаю со студенческими работами здесь

Написать функцию Факториал и программу, которая будет использовать эту функцию
Суть программы: Нужно написать функцию Факториал и программу.ю которая будет использовать эту...

Написать функцию, которая могла бы передать значение в другую функцию
как сделать функцию которая бы могла передать значеие в другую функцию ну к примеру a=4*b; где...

Написать функцию, которая, в зависимости от выбора пользователя вызывает функцию сложения, произведения
Кто знает как можно решить эту задачу на С++? Написать функцию, которая, в зависимости от выбора...

Написать функцию, определяющую пол продавца. Используя функцию, вывести продавцов - мужчин
Вопрос: Можно ли из этого запроса сделать как-то функцию, которую мне надо: select r.full_name, ...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Опции темы

Новые блоги и статьи
Интеграция Arduino и ChatGPT: Практическое руководство InfoMaster 16.01.2025 В современную эпоху технологических инноваций интеграция искусственного интеллекта с микроконтроллерами открывает принципиально новые возможности для создания умных устройств и автоматизированных. . .	Как создать робота, управляемого ChatGPT InfoMaster 16.01.2025 Концепция проекта В современную эпоху искусственный интеллект и робототехника становятся все более доступными для энтузиастов и разработчиков. Создание роботизированной руки, управляемой ChatGPT,. . .	Как создать ChatGPT бота в Telegram на Python InfoMaster 16.01.2025 В современном мире технологии искусственного интеллекта становятся все более доступными для разработчиков, открывая новые возможности для создания умных и интерактивных приложений. Одним из самых. . .	Машинное обучение с помощью Python InfoMaster 16.01.2025 Машинное обучение стало неотъемлемой частью современных технологий, позволяя компьютерам учиться на основе данных и принимать решения без явного программирования. В сочетании с языком. . .	Использование связки C# и PHP в корпоративной разработке и микросервисной архитектуре InfoMaster 16.01.2025 Введение в интеграцию C# и PHP В современной корпоративной разработке все чаще возникает потребность в создании гибких и масштабируемых решений, способных эффективно решать широкий спектр. . .	Как использовать Kerio дома для управления сетью и пользователями InfoMaster 16.01.2025 Использование технологий для улучшения повседневной жизни стало неотъемлемой частью современного быта. Одной из таких технологий является Kerio — мощный инструмент для управления сетью и. . .
Есть ли будущее у DVD и Blu-ray? InfoMaster 16.01.2025 В эпоху стремительного развития цифровых технологий и повсеместного распространения потоковых сервисов вопрос о будущем физических носителей информации становится все более актуальным. Особенно остро. . .	Как проводить научные вычисления на Python InfoMaster 15.01.2025 Python стал одним из наиболее востребованных языков программирования в области научных вычислений благодаря своей простоте, гибкости и обширной экосистеме специализированных библиотек. Научные. . .	Создание игры типа Minecraft на PyGame/Python: пошаговое руководство InfoMaster 15.01.2025 В данном руководстве мы рассмотрим процесс создания игры в стиле Minecraft с использованием библиотеки PyGame на языке программирования Python. Этот проект идеально подходит как для начинающих. . .	Как создать свою первую игру в стиле Doom на Unreal Engine InfoMaster 15.01.2025 Разработка шутера от первого лица в стиле классического Doom представляет собой увлекательное путешествие в мир игрового программирования, где сочетаются творческий подход и технические навыки. . . .	Параллельное программирование: основные технологии и принципы InfoMaster 15.01.2025 Введение в параллельное программирование Параллельное программирование представляет собой фундаментальный подход к разработке программного обеспечения, который позволяет одновременно выполнять. . .	Как написать микросервис на C# с Kafka, MediatR, Redis и GitLab CI/CD InfoMaster 15.01.2025 В современной разработке программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот подход позволяет разделить сложную систему. . .

Наверх