Решение задачи усовершенствованным методом Эйлера. Error 207. Помогите разобраться

@Drs26 · Регистрация: 02.03.2013

Author24 — интернет-сервис помощи студентам

Помогите, пожалуйста, решение задачи усовершенствованным методом Эйлера:

@Drs26 · 01.03.2014, 19:06 **[ТС]**

Во вложение прикрепил: фото задание.
Сам же решал, но у меня постоянно выводит ошибку.
Error 207: Invalid floating point operation.
Текст программы:

Pascal

{Modivicirovan metod}
Program Drs;
uses crt;
var i,n:integer; b,h,x,y,y0:real;
function f(x,y:real):real;
begin
f:=(x*y+4)/(2*y-x*y+1);
end;
 
begin
clrscr;
write ('Vvedi otrezok:');
read (x,b);
write ('Skolko shagov:');
readln (n);
h:=(b-x)/n;
write ('Y(0):');
read (y0);
y:=y0;
writeln ('X':6,'Y':6);
for i:=1 to n+1 do begin
y:=y+h/2*(f(x,y)+f(x,(y+h*(f(x,y)))));
writeln (x:6:2,y:8:4);
x:=x+h;
end; readln;
readln;
end.

@Drs26 · 02.03.2014, 12:59 **[ТС]**

Ребята помогите, меня эта ошыбка 207 надоела...( пожалуйста.

@Puporev · 02.03.2014, 14:02

Вводи данные корректно и не будет ошибки.

@Drs26 0 / 0 / 0 Регистрация: 02.03.2013 Сообщений: 28
		1
	Решение задачи усовершенствованным методом Эйлера. Error 207. Помогите разобраться 01.03.2014, 18:53. Показов 1615. Ответов 3 Метки нет (Все метки) Помогите, пожалуйста, решение задачи усовершенствованным методом Эйлера: 0

@Drs26 0 / 0 / 0 Регистрация: 02.03.2013 Сообщений: 28
	02.03.2014, 12:59 [ТС]	3
	Ребята помогите, меня эта ошыбка 207 надоела...( пожалуйста. 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	02.03.2014, 14:02	4
	Сообщение было отмечено Drs26 как решение Решение Вводи данные корректно и не будет ошибки. Миниатюры 1