Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 13.06.2017
Сообщений: 10

Вычислить значение выражения

18.06.2017, 09:37. Показов 658. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Формула:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
H=\sqrt{\begin{vmatrix}\operatorname{tg}\left(a+b^5 \right)\end{vmatrix}}-(a-1)^b<br />
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
18.06.2017, 09:37
Ответы с готовыми решениями:

Вычислить значение выражения, значение n вводится с клавиатуры
составить программу для решения задачи. При решении задачи через цикл-&quot;хорошо&quot;, через цикл и массив-&quot;отлично&quot;. Отметка...

Вычислить значение выражения
Задание в виде картинки. Прошу помощи. :) Нужен код в Паскале Σ

Вычислить значение выражения
Циклы с заданным числом итераций Вычислить P=(cosx1 +sinx2)(cosxn +sinx(n+1))

5
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
18.06.2017, 10:36
Pascal
1
2
3
4
5
6
7
8
9
10
11
var a,b,h:real;
begin
writeln('Введите 2 числа a,b');
readln(a,b);
if (a-1<0)and(frac(b)<>0)then write('Значение Н не определено, отрицательное число в вещественной степени')
else
 begin
  h:=sqrt(abs(sin(a+power(b,5))/cos(a+power(b,5))))+power(a-1,b);
  write('H=',h:0:3);
 end;
end.
0
Модератор
10430 / 5718 / 3404
Регистрация: 17.08.2012
Сообщений: 17,389
21.06.2017, 15:32
Цитата Сообщение от Puporev Посмотреть сообщение
отрицательное число в вещественной степени
Как так не определено? Я был о Pascal ABC лучшего мнения.

Вообще говоря, значение xy не определено тогда, когда y<>0, 1/y нацело делится на 2 и x<0, или когда x и y равны 0 одновременно.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
21.06.2017, 16:08
Цитата Сообщение от Cyborg Drone Посмотреть сообщение
Я был о Pascal ABC лучшего мнения.
А о калькуляторе Windows? Возведи -2 в степень 1,23. По моему это общее математическое понятие.
Есть правда разные фокусы в программировании, когда степень можно привести к рациональному виду типа 5/2 4/3 и т.д.
volvo в какой-то теме расписывал.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33395 / 21505 / 8236
Регистрация: 22.10.2011
Сообщений: 36,900
Записей в блоге: 12
21.06.2017, 16:34
Цитата Сообщение от Puporev Посмотреть сообщение
в какой-то теме
Вот в этой: https://www.cyberforum.ru/post7168301.html
1
Модератор
10430 / 5718 / 3404
Регистрация: 17.08.2012
Сообщений: 17,389
21.06.2017, 19:59
С одной стороны, никак нельзя возводить отрицательное число в степень, представляющую из себя конечную десятичную дробь, поскольку, например,

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
(-2)^{1.23}=(-2)^{\frac{123}{100}}=\sqrt[100]{(-2)^{123}}<br />

Получился корень чётной степени из отрицательного числа. То есть, с точки зрения действительных чисел - ну никак нельзя.

Но, с другой стороны, а что насчёт комплексных чисел? Для данного примера по формуле Муавра можно записать

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
(-2)^{1.23}=2^{1.23}e^{1.23\pi i+2\frac{123\pi i}{100}n}<br />

где n, в данном случае, может принимать одно из 100 целых значений, от 0 до 99, иными словами, (-2)1.23 имеет 100 значений, и среди этих 100 значений вполне могут найтись (два) значения, у которых мнимая часть равна 0. Это в том случае, если вдруг случится, что при некотором n будет иметь место

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
1.23\pi i+2\frac{123\pi i}{100}n=k\pi<br />

где k - целое число.

А могут ведь и не найтись. И что-то мне подсказывает, что для данного примера и не найдутся. Считать неохота.

Так что, да, с большой степенью вероятности, можно считать, что отрицательное число в конечную десятичную дробь возводить нельзя.

Но, сами понимаете, это, на самом деле, неправда. Просто далеко не всегда в сотнях или миллионах комплексных корней вдруг случаются действительные. Да, не упомянул, корней этих будет максимум 10p-1, где p - количество значащих разрядов числа.

Иными словами, задачка не настолько проста, и, вот ведь подлость какая, никак не может быть корректно решена с применением чисел с конечной длиной мантиссы. Так что, windows калькулятор прав, будь он неладен.

Извиняюсь. Это всё из-за моей привычки мыслить абсурдно.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
21.06.2017, 19:59
Помогаю со студенческими работами здесь

Вычислить значение выражения
Вычислить

Вычислить значение выражения
Очень долго долбился, но до сих пор не понял как это решить... В общем, вот: y=\begin{cases} a+bx+cx^2 &amp; \text{ , } 1 \le x...

Вычислить значение выражения
Пусть дана вещественная квадратная матрица порядка n. Получите х1 хn + х2 хn-1 + ... + хn х1, где хi — наибольшее значение элементов i-й...

Вычислить значение выражения
Записать на Паскале следующие формулы (x&gt;0): {x}^{-1};{x}^{4};{x}^{-2};{x}^{4};{x}^{100}

Вычислить значение выражения
Вот что у меня: program z228; var a,b,x,h,j,k:real; begin readln(a,b,x); h:=cos(x*x)/(sin(x*x)); j:=h*h*h; if x&lt;0 then ...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru