Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Ishiiii
2 / 2 / 1
Регистрация: 20.10.2013
Сообщений: 17
1

Вывести таблицу значений заданной функции

23.10.2013, 21:07. Просмотров 314. Ответов 0
Метки нет (Все метки)

Задание: в виде, аналогичном таблицам Брадиса, вывести (с заданным количеством знаков после десятичной точки) таблицу значений заданной функции в диапазоне от Хнач до Хкон с заданным шагом h. По горизонтали шаг должен изменяется на величину(0.05/0.1)•h. Выдать результат в виде таблицы, для построения которой использовать коды ASCII.

Вот решение функции с циклом while, а как собственно впихнуть эту таблицу. Может кто поможет?

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
33
34
35
36
37
38
39
40
41
42
43
44
Program Lab5_1;
uses Crt;
var xn,xk,h,x,y,a,q:real;
const t=1e-9;
begin
 ClrScr;
 writeln('Vvedite xnach=');
 readln(xn);
 writeln('Vvedite xkon=');
 readln(xk);
 writeln('Vvedite shag h');
 readln(h);
 writeln ('x   |   y') ;
 x:=xn;
 q:=0;
 while x<=xk+t do
 begin
if abs(cos(x))>t then
 begin
 a:=sqr(sin(x)/cos(x))-exp(ln(2)*x);
 a:=exp(ln(abs(a))/5);
 if abs(a)>t then
  begin
  if x>t then
   begin
    y:=sqrt(abs(ln(x)-exp(2.3*x)));
    y:=y/a+1.3*(sqr(x*x*x)*x);
    writeln('y=',y:10:3);
   end
  else writeln('Error 1. x<=0 v ln(x).');
  end
 else writeln('Error 2. Znamenatel raven 0.');
 end
else writeln('Error 3. Cos(x)=0 ili x<=0.');
   x:=x+h;
q:=q+1;
  if q=20 then
  begin
  readkey;
  q:=0
  end   
end;
readkey
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.10.2013, 21:07
Ответы с готовыми решениями:

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

В задаче необходимо вывести на экран таблицу значений функции У(х) и ее разложения в ряд С (х) для значений х от до с шагом.(Паскаль)
В задаче необходимо вывести на экран таблицу значений функции Y (x) и ее...

В задаче необходимо вывести на экран таблицу значений функции У(х) и ее разложения в ряд С (х) для значений х от до с шагом.(Паскаль)
В задаче необходимо вывести на экран таблицу значений функции Y (x) и ее...

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

Вывести таблицу значений Функции
Используя цикл с постусловием Repeat, написать программу, которая выводит...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.10.2013, 21:07

Вывести таблицу значений функции
1.Вывести таблицу значений функции y=2sinx+cos2x на отрезке от a=-\pi до b=\pi ...

Вывести таблицу значений функции
Напишите пожалуйста программу, заранее спасибо.

Вывести таблицу значений функции
после 5 пар психологии и экзамена по истории голова совсем не варит, если это...


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

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

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