Составить алгоритм и программу печати значений функции y:=cos^2x для x=10,9,8,7,...,1.
Составить алгоритм и программу печати значений функции y:=cos^2x для x=10,9,8,7,...,1.
Ответ(ы) на вопрос:
Var
i:integer;
Begin
for i:= 10 downto 1 do
Writeln('cos^2(',i,') = ',sqr(cos(i)));
End.
Не нашли ответ?
Похожие вопросы