Ответы
Ответ дал:
0
Var
i:integer;
Begin
for i:= 10 downto 1 do
Writeln('cos^2(',i,') = ',sqr(cos(i)));
End.
i:integer;
Begin
for i:= 10 downto 1 do
Writeln('cos^2(',i,') = ',sqr(cos(i)));
End.
Похожие вопросы
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад