Цитата:
Сообщение от Филька
Здравствуйте, помогите решить функцию.
z=корень из (2t^2+3sint+1) Измерение аргумента: интервал= tЄ[1;3]; шаг= 0,2. Спасибо!
|
ну вот, вроде все работает нормально)
var z,t:real;
begin
clrscr;
t:=1;
repeat
write('t= ',t:0:1,' ');
z:=sqrt(2*sqr(t)+3*sin(t)+1);
writeln('z= ',z:0:4);
t:=t+0.2;
until t>=3.000001;
readln;
end.