Вычислите значения функции w=y^2+1/y^2-1 на отрезке [0; 0,5] с шагом 0,1

(составить блок-схему алгоритма и программу для программирования Pascal. ABC

Question

Мина

25 января, 05:15

+2

Ответы (1)

Знаешь ответ?

Агафангел · Answer 1

Var

Y:real;

Begin

Y:=0;

Repeat

WriteLn ('W (', Y,') = ', (Y*Y+1) / (Y*Y-1));

Y:=Y+0.1;

Until Y>0.5

End.

Вычислите значения функции w=y^2+1/y^2-1 на отрезке [0; 0,5] с шагом 0,1(составить блок-схему алгоритма и программу для программирования Pascal. ABC