Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
PaWlIk32
0 / 0 / 0
Регистрация: 08.03.2017
Сообщений: 11
#1

Метод трапеций для решения задач Коши - Pascal

26.04.2017, 15:18. Просмотров 208. Ответов 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
26
27
28
29
uses crt;
function F(x:real):real;
begin
 F:=exp(x)/x;
end;
const
n=5;
var y,a,b,h,k,s:real;
    i:integer;
begin
clrscr;
write('введите y(0)=');
readln(y);
write('начало отрезка a=');
readln(a);
write('конец отрезка b=');
readln(b);
h:=(b-a)/n;
s:=(F(a)+F(b))/2;
k:=a;
for i:=1 to n-1 do
 begin
  k:=k+h;
  s:=s+F(k);
 end;
s:=y+s*h;
write('результат: ');
writeln (s );
end.
не могу переписать ее, чтобы в окне вывода показывало значение i при котором решалось, значение x и значение функции в этой точке.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.04.2017, 15:18
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Метод трапеций для решения задач Коши (Pascal):

Разработать программу для численного решения задачи Коши - Pascal
Огромная просьбище помочь с решением задачи. В прошлом семестре проблем с паскалем не было, а тут пошла математика, и я, стыдно признаться,...

График в методе Эйлера для решения задачи Коши - Pascal
Прошу помощи в построении точечного графика. Сам метод я сделал, но вот с графиком не могу справится. Program Lab6; const a=0; ...

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

Подходит ли Pascal (паскаль) для решения олимпиадных задач? - Pascal
Если не подходит, то каким лучше пользоваться? Было бы замечательно, если бы кто-нибудь, еще подсказал, как можно подготовиться к...

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

Составить блок-схему и написать программу на языке Паскаль для решения следующих задач: - Pascal
2. Велосипедист массой М кг движется со скоростью V м/с по вогнутому мосту, траектория его движения является дугой окружности радиусом R м....

2
Puporev
Модератор
52849 / 40660 / 13914
Регистрация: 18.05.2008
Сообщений: 94,386
26.04.2017, 18:15 #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
26
27
28
29
30
uses crt;
function F(x:real):real;
begin
 F:=exp(x)/x;
end;
const
n=5;
var y,a,b,h,k,s:real;
    i:integer;
begin
clrscr;
write('введите y(0)=');
readln(y);
write('начало отрезка a=');
readln(a);
write('конец отрезка b=');
readln(b);
h:=(b-a)/n;
s:=(F(a)+F(b))/2;
k:=a;
for i:=1 to n-1 do
 begin
  k:=k+h;
  s:=s+F(k);
  writeln('i=',i+1,' x=',k:5:2,' f=',f(k):8:4);
 end;
s:=y+s*h;
write('результат: ');
writeln ('S=',s:0:2);
end.
0
PaWlIk32
0 / 0 / 0
Регистрация: 08.03.2017
Сообщений: 11
27.04.2017, 08:37  [ТС] #3
да так, спасибо)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.04.2017, 08:37
Привет! Вот еще темы с ответами:

Составить блок-схему и написать программу на языке Паскаль для решения следующих задач: - Pascal
1. Определить стоимость международного телефонного разговора, если известны тариф, длительность разговора, скидка (%).

Метод Трапеций - Pascal
Добрый день. Знаю что раньше эта тема возможно обсуждалась но все же обращусь ко всем за помощью. Необходимо написать программу по методу...

метод трапеций - Pascal
Не знаю как решить такую задачу: Вычислить значение определённого интеграла методом трапеций : Ln(5.50+x)+4.30 пределы...

Метод симпсона и трапеций - Pascal
как написать в паскале десятичнай логарифм???? и как написать программу почисленному интегрированию(метод симпсона и метод трапеций)если...


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

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

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