Напечатать таблицу значений функций sin x и cos x на отрезке [0,1] с шагом 0.1 в следующем виде ( с циклом for, пожалуйста):_x______sin(x)_____cos(x)___0.0000 0.0000 1.00000.1000 0.0998 0.9950............................1.0000 ...
Напечатать таблицу значений функций sin x и cos x на отрезке [0,1] с шагом 0.1 в следующем виде ( с циклом for, пожалуйста):
_x______sin(x)_____cos(x)___
0.0000 0.0000 1.0000
0.1000 0.0998 0.9950
............................
1.0000 0.8415 0.5403
Заранее благодарен
Гость
Ответ(ы) на вопрос:
ГостьVar
X:integer;
Begin
WriteLn('X Sin(X) Cos(X)');
For X:= 0 to 10 do
WriteLn((X/10):0:4,' ',Sin(X/10):0:4,' ',Cos(X/10):0:4);
End.
Не нашли ответ?
Похожие вопросы