практическая работа

[newlife]

определить У, если X=X1,X2,x3.....X10. Y=2*x в квадрате-4*sin в квадрате*x

[Stilet]

Язык? Наработки?

[newlife]

паскаль..

[ROMA2PVT]

Program primer;
Uses
   crt;
Var
  h,x,n,f:real;
  i:integer;
Begin
x:=1;
    for i:=1 to 10 do
begin
    f:=(2*sqr(x))-(4*sin(sqr(x)));
    writeln(f,' ');
    x:=x+1;
    end;
    writeln;
    end.

Ну можно вот так.Если чё кто нить подправит.

[Stilet]

Очень смешно. Наработки то где?

 for i:=1 to 10 do y:=sqr(2*x*x)-4*sqr(sin(x))*x

Ясен смысл?

[ROMA2PVT]

Очень смешно.

это ко мне или к ней вы обращаетесь?

[ROMA2PVT]

 y:=sqr(2*x*x)-4*sqr(sin(x))*x

Ну а поповоду уравнения.Я ведь не телепат понять что у неё там написано.

[newlife]

д что все такие грубые здесь?...спасибо всем большое.

[ROMA2PVT]

Оффтоп:
По поводу грубости.Просто надо немного подумать и решение само придёт.Ну а про наработки спрашивать это правильно.И лучше ваще не писать тем кто не делает ничего.
Ну а я вот такой простодушный вот и помогаю.

[newlife]

спасибо вам большое...