Написать программу на языке Pascal.


Написать программу на языке Pascal.

Пацивис Пацивис    3   15.06.2020 20:42    0

Ответы
Kamarir Kamarir  15.10.2020 14:05

В условии слишком мало данных для нахождения закономерности в "cosx + cos2x - cos3x+...+cos13x" , поэтому сочтём за опечатку и напишем программу для "cosx + cos2x + cos3x + ... + cos13x".

var x,S:real; beginRead(x);for var i := 1 to 13 doS := S + Cos(i*x);Write(S);end.

PascalABC.NET:

beginvar x := ReadReal;(1..13).Sum(i->Cos(i*x)).Printend.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика