Ïðèìåð. Íàéòè çíà÷åíèå 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.
Çàäàíèÿ.