Mail.RuПочтаМой МирОдноклассникиИгрыЗнакомстваНовостиПоискВсе проекты

Паскаль выдаёт ошибку: Вещественное деление на 0!

Знаток (337), на голосовании 3 года назад
Program Z_1;

Var x,r,a,b,h,y:Real;

Begin

x:=a;

While x<=b do

Begin

r:=EXP(x)*EXP(y)+EXP(-x)*EXP(-y)/x*y;

Writeln ('x','r=');

x:=x+h;

END;

END.
Голосование за лучший ответ
Да не введены остальные переменные, в частности У, а также Н и В
Похожие вопросы
Также спрашивают