Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 19.05.2015
Сообщений: 4
1

Разработать алгоритм и составить программу табулирования функции

08.06.2015, 01:48. Показов 1384. Ответов 1
Метки нет (Все метки)

Разработать алгоритм и составить программу табулирования функции по одному из вариантов таблицы 5.1. Вычисления значений функции выполнить циклом с предусловием. Начальное и конечные значения аргумента и шаг его приращения вводятся с клавиатуры по запросу программы. Таблица должна иметь «шапку» вида: ----------------------------------- I Аргумент x I Функция y I ------------------------------------ В качестве разделителя строк использовать линию, образованную символа- ми «-». На дисплей и в текстовый файл выводятся исходные данные с указанием имен переменных и результаты работы программы в виде таблицы.
Формула:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
F(x)=e^x-\frac 1{e^x}<br />

Интервал:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
x\in [-1.8;\,1.6]<br />

Шаг:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\operatorname{d}x=0.2<br />

Помогите подправить программу
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Program aizek;
var
x,xn,xk,y,dx:real; 
begin;
writeln('Введите значение dx');
readln(dx);
writeln('Введите значение xn');
readln(xn);
writeln('Введите значение xk');
readln(xk);
x:=xn;
writeln('-----------------------------');
writeln('I Аргумент x I   Функция y I');
writeln('-----------------------------');
while x<xk do
begin
y:=exp(x)-(1/(exp(x)));
writeln(x:7:2, y:17:3);
x:=x+dx
end;{while}
END.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.06.2015, 01:48
Ответы с готовыми решениями:

Разработать алгоритм и программу табулирования функции
Разработать алгоритм и программу табулирования функции e=10n/lg(n+2) при изменении n от 1 до...

Разработать алгоритм табулирования функции. Вычислить значение функции
Прошу помочь с паскалем. Задание: разработать алгоритм табулирования функции. Вычислить значение...

Программирование алгоритмов циклической структуры. Разработать алгоритм табулирования функции
Изучить возможности языка для реализации: вычислительных процессов циклической структуры с...

Разработать алгоритм и составить программу вычисления таблицы значений функции
Помогите пожалуйста разработать алгоритм и составить программу вычисления таблицы значений функции,...

1
Модератор
63400 / 47085 / 32454
Регистрация: 18.05.2008
Сообщений: 114,127
08.06.2015, 07:32 2
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
Program aizek;
var x,xn,xk,y,dx:real;
begin;
write('Введите значение xn=');
readln(xn);
repeat
write('Введите значение xk>',xn:0:1,' xk=');
readln(xk);
until xk>xn;
repeat
writeln('Введите значение dx<',xk-xn,' dx=');
readln(dx);
until dx<xk-xn;
x:=xn;
writeln('----------------------------');
writeln('| Аргумент x |   Функция y |');
writeln('----------------------------');
while x<xk+dx/2 do
 begin
  y:=exp(x)-1/exp(x);
  writeln('|',x:8:2,'    |',y:9:3,'    |');
  x:=x+dx
end;{while}
writeln('----------------------------');
END.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.06.2015, 07:32

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Разработать алгоритм и составить программу вычисления таблицы значений функции
Помогите пожалуйста разработать алгоритм и составить программу вычисления таблицы значений функции,...

Разработать алгоритм и составить по нему программу для вычисления значений функции z = f(x,y)
Разработать алгоритм и составить по нему программу для вычисления значений функции z = f(x,y)....

Разработать алгоритм и составить по нему программу для вычисления значений функции y = f(x)
Разработать алгоритм и составить по нему программу для вычисления значений функции y = f(x)....

Разработать программу табулирования функции
Разработать программу табулирования функции q=max(x+y+z,x*y*z)/min(x+y+z,x*y*z)


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.