Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.02.2010, 20:03   #1
Айдар
Форумчанин
 
Регистрация: 20.06.2009
Сообщений: 195
По умолчанию pascal найти ошибку.

Привет всем надо вычислить интеграл методом трапеции, интеграл=x*x+3;
вот набрасал:

Код:
uses crt;
var a,b,x,n,dx,y,f:real;
    i:integer;
begin
f:=x*x+3;
y:=0;
readln(a,b,n);
dx:=(b-a)/n;
x:=a+dx;
while x<b do
 begin
 y:=y+f(x); {вот тут говорит чтобы я поставил ;}
 x:=x+dx;
 end;
 y:=(y+(f(a)+f(b))/2)*dx;
writeln('Площадь по формуле трапеций',y:10:3);
end.
зы щас че какаой-то фильтр стоит в названиях темы?

Последний раз редактировалось Айдар; 09.02.2010 в 20:05.
Айдар вне форума Ответить с цитированием
Старый 09.02.2010, 20:34   #2
Айдар
Форумчанин
 
Регистрация: 20.06.2009
Сообщений: 195
По умолчанию

ау ребят помогите, мне завтра это сдать надо.
Айдар вне форума Ответить с цитированием
Старый 09.02.2010, 20:48   #3
Alt
Лжец и смутьян
Форумчанин
 
Аватар для Alt
 
Регистрация: 03.04.2009
Сообщений: 194
По умолчанию

Код:
 y:=y+f(x);
Это что вообще за безобразие, использовать переменную как оператор?
Что вообще эта строчка должна делать!?
Помогли тебе - помоги другому.
Alt вне форума Ответить с цитированием
Старый 09.02.2010, 20:51   #4
Айдар
Форумчанин
 
Регистрация: 20.06.2009
Сообщений: 195
По умолчанию

блин да я сам вот не могу записать, может поможете исправить код?
Айдар вне форума Ответить с цитированием
Старый 09.02.2010, 20:53   #5
Alt
Лжец и смутьян
Форумчанин
 
Аватар для Alt
 
Регистрация: 03.04.2009
Сообщений: 194
По умолчанию

Цитата:
Сообщение от Айдар Посмотреть сообщение
блин да я сам вот не могу записать, может поможете исправить код?
Ты объясни что ты хочешь от этой строки? ЧТо бы она умножила? Ну поставь знак умножения *
Помогли тебе - помоги другому.
Alt вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите найти ошибку в программе на Pascal Cade Паскаль, Turbo Pascal, PascalABC.NET 1 04.07.2009 20:07
Задача Pascal (Procedure) Помогите найти ошибку! Seriy8888 Паскаль, Turbo Pascal, PascalABC.NET 2 14.12.2008 14:53
[Turbo Pascal] Помогите найти ошибку в сортировке, пожалуйста. Pork6 Помощь студентам 3 08.10.2008 21:29