Войти Регистрация Спроси ai-bota

Вычислить y=cosx+ cosx^2++ cosx^3++cosx^n

Ответ:

Tara8808

01.10.2020 20:08

Var y,k,x:real;
n,i:integer;
begin
readln(x);
readln(n);
y:=0;k:=1;
for i:=1 to n do begin
k:=(sin(x))*k;
y:=y+k;
end;
writeln(y);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

6Darya6

06.02.2023 23:11

Дан массив а(m), меньше или равно 20. ввести на печать сумму элементов массива, если она превосходит число 50, в противном случае вывести в печать исходный массив....

hellday

30.01.2023 14:41

Что обьеденяет 1,2,5,9какая основная классификация...

LudmilaB

30.01.2023 14:41

Превратить слово море изменяя одну букву в слово суша...

GLid

30.01.2023 14:41

Псевдокод. выход. задана матрица а из n элементов (n не превосходит 50). над главной диагональю вычислить сумму (s) элементов до первого нуля....

dhvcn

30.01.2023 14:41

Нужна . необходимо в паскале создать программу вращения земли вокруг солнца,однако вокруг земли должна вращаться луна.заранее ....

tvzhanna80

28.09.2022 22:35

Занести в одно мерный массив целые числа с клавиатуры. затем определить в массиве и вывести на экран следующие значения: числа-элементы массива, у которых индекс...

Nadezhdakarpov1

26.10.2022 13:13

Построить блок-схему и написать программу для вычисления произведения четных чисел на паскале...

Tomrico11

07.09.2020 11:46

Известные вам примеры иерархий из других предметных областей( и т.д)...

влад2002ffffffff

15.05.2020 13:46

Писал программу. найдите ошибку, . строка: 35 столбец: 5 ошибка: ожидалось else или символ точка с запятой program game; uses crt; var a: string; b: integer; c: string;...

galina060876

12.12.2021 10:32

8класс! укажите минимальный объем памяти (в килобайтах), достаточный для хранения любого растрового изображения размером 256 х 256 пикселей, если известно, что в...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку