Home02:

Ïðèìåð. Íàéòè çíà÷åíèå y = f(x,t), ãäå

Program Example;

Uses wincrt;

Var x, y, t: Real;

Begin

Write (‘x=’); ReadLn (x);

Write (‘t=’); ReadLn (t);

y:= (1+x*x-2*x*t)/(1+sqrt(1+sqr(sin(x))+0.3*sqr(cos(x*t)));

WriteLn (‘f(‘, x:5:1, ‘,’, t:5:1, ‘)=’, y:7:2);

End.

Çàäàíèÿ.