0 / 0 / 0
Регистрация: 24.11.2009
Сообщений: 40
1

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

24.11.2009, 18:49. Показов 983. Ответов 4
Метки нет (Все метки)

Помогите написать задачу по этой формуле: Название: clip_image002.gif
Просмотров: 194

Размер: 674 байт
Вот написал но что то не сходится:

Pascal
1
2
3
4
5
6
7
8
9
var H,a,b:real;
begin
write ('a=');
readln (a);
write ('b=');
readln (b);
H=sqrt(abs(sin(a)/cos(a)*(a+exp(5+ln(b)))))-exp(b+ln(a-1));
writeln (H);
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.11.2009, 18:49
Ответы с готовыми решениями:

Вычислить значение выражения
Доброго времени суток! Прошу помощи) Нужно написать код на Turbo Pascal-е для решения примера на...

Вычислить значение выражения
Даны x,y. Вычислить z.

Вычислить значение выражения
Ребят помогите написать программы на первое и второе задание.

Вычислить значение выражения
Кто разбирается в языке паскаль?Решения ниже нужно перевести на паскаль.То есть решение решать не...

4
Платежеспособный зверь
8816 / 4243 / 1617
Регистрация: 28.10.2009
Сообщений: 11,383
24.11.2009, 19:12 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
var H,a,b,с:real;
begin
write ('a=');
readln (a);
write ('b=');
readln (b);
c:=a+exp(5+ln(b));
H=sqrt(abs(sin(c)/cos(c)))-exp(b+ln(a-1));
writeln (H);
end.
1
51 / 49 / 17
Регистрация: 30.10.2009
Сообщений: 152
24.11.2009, 19:29 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Попробуй мою версию
Pascal
1
2
3
4
5
6
7
8
9
10
11
var H,a,b,x:real;
begin
write ('a=');
readln (a);
write ('b=');
readln (b);
x:=a+Exp(5*ln(b));   {Вводим вспомогательную переменную}
H:=sqrt(abs(sin(x)/cos(x)))-exp(b*ln(a-1));
writeln (H:5:3);
Readln;
end.
Нужно найти область определения для a и b. У меня работает при a=b>2
0
0 / 0 / 0
Регистрация: 24.11.2009
Сообщений: 40
24.11.2009, 19:37  [ТС] 4
Я не очень хорошо шарю в паскале, можешь обьяснить что значит???
(H:5:3)
0
51 / 49 / 17
Регистрация: 30.10.2009
Сообщений: 152
24.11.2009, 19:56 5
5 - количество значащих цифр
3 - количество цифр после запятой
Скорее всего к этой задаче не подходит так как в ответе длинные числа.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.11.2009, 19:56
Помогаю со студенческими работами здесь

Вычислить значение выражения
Написать арифметическое решение и блок-схему . Плз помогите! ...

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

Вычислить значение выражения
Дано натуральные числа n,m, одномерные целочисленные массивы A(n), B(m), C(10). L=\begin{cases}...

Вычислить значение выражения
Разработать 2 программы с использованием function так и procedure для вычисления и вывода в файл...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru