Вывести "столбиком" значения: sin2 sin4 sin6 ......sin20
Вывести "столбиком" значения: sin2 sin4 sin6 ......sin20
Гость
Ответ(ы) на вопрос:
ГостьVar A:integer;
Begin
For A:=1 to 10 do
WriteLn('Sin(',A*2,') = ',Sin(2*A):0:7)
End.
Не нашли ответ?
Похожие вопросы