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

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

18.10.2013, 09:08. Показов 1123. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Вычислить значение выражения на Паскале,буду очень благодарен
Миниатюры
Вычислить значение выражения  
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.10.2013, 09:08
Ответы с готовыми решениями:

Вычислить значение выражения
Составить программу на языке pascal с использованием процедур и функций:

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

Вычислить значение выражения
Помогите решить)) написать программу, которая по заданному натуральному значению n вычисляет...

Вычислить значение выражения
Составить программу с помощью процедур Procedure Составить программу находящую значение следующего...

1
228 / 225 / 220
Регистрация: 03.07.2012
Сообщений: 466
18.10.2013, 12:58 2
Лучший ответ Сообщение было отмечено scarfaces как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
uses
  crt;
const
  z = sqrt(abs(2 - Pi));
  x = 0.0000000671;
  y = -0.6023;
function Tg(x : real) : real;
begin
  Tg := Sin(x)/Cos(x);
end;
function Lg(x : real) : real;
begin
  Lg := Ln(x)/Ln(10);
end;
function ArcSin(x : real) : real;
begin
  ArcSin := ArcTan(x/(1-sqr(x)));
end; 
function St(x, y : real) : real;
begin
  if X>0 then St := exp(y*ln(abs(x)))
  else St := -exp(y*ln(abs(x)));
end;
var
  a, b : real;
begin
  clrscr;
  a := Lg(ArcSin(-z/x));
  b := 1/(a + z) + x*y/100;
  writeln('Результат : ',Tg(St(a,1/3) + St(2,b)):0:9);
  readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.10.2013, 12:58
Помогаю со студенческими работами здесь

Вычислить значение выражения
Помогите пожалуйста!Вычислить значение выражения y=x!/(2x)!+(x-1)! ,значение x вводится с...

Вычислить значение выражения
Составить блок-схему и код на Паскале. Задание: Y=a+b-x^2 Y=a-b+x^3

Вычислить значение выражения
Помогите пожалуйста) задание такое: Даны n, x, массив t(n). вычислить \prod_{K=1}^{n} \left(...

Вычислить значение выражения
Подскажите пожалуйста как эта формула в паскале будет выглядеть :cry: Добавлено через 2 минуты...


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

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

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