Найти значение функции y = 3x^6 - 6x^2 - 7 при данном значении x

Категория: Delphi/Pascal

2011-11-14 23:32:32

code: #pascal

Program Begin25;
Var
x,y:Real;
Begin
WriteLn('Введите х');
ReadLn(x);
y:=3*(sqr(x)*sqr(x)*sqr(x)) - 6*sqr(x) - 7;
WriteLn('y(x) = ',y);
ReadLn;
End.

автор: Sklyarov Sergej a.k.a. S9

Поделиться:

Sample Code