Арсений
6 год назад
Напечатать таблицу значений функций 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 0.8415 0.5403Заранее благодарен
ОТВЕТЫ
Добри
Oct 24, 2020
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.
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.
307
Смежные вопросы:
