Вычислить произведение y=arctg 4 * arctg 6 * arctg 8 * * arctg t. t - чётное, задается с клавиатуры.

Ответы

ева518 06.10.2020 08:48

Var
   t:integer;
   y:real;
Begin
y:=1;
Write('t = ');ReadLn(t);
While t >= 4 do
   Begin
   y:=y*ArcTan(t);
   t:=t-2
   End;
WriteLn('y = ',y);
End.

ПОКАЗАТЬ ОТВЕТЫ

Другие вопросы по теме Информатика

regroom 30.09.2019 21:30

Рассмотрите алфавит состоящий из следующих символов 0 1 2 3 4 5 6 7 8 9 a b c d e f какова го мощность...

Мертвый0Анархист 30.09.2019 21:30

Число а9а является первым числом в последовательности из 20 натуральных чисел в позиционный системе счисления основанием n=11? записать эту последовательность...

Yasik228 30.09.2019 21:30

Входные данные дана последовательность натуральных чисел, в конце которой идет число 0. выходные данные определите, сколько элементов этой последовательности больше предыдущего....

romakereshev 30.09.2019 21:30

1.в гардеробе стоят 16 пар обуви.сообщение о том, что достали коричневую пару обуви, несет 3 бита информации.сколько коричневых пар обуви было в гардеробе? 2.в коробке лежат...

18Tanya 11.08.2019 12:50

Решить по информатике (дано-решение) : найти информационный объём растрового черно-белого (без оттенков серого) изображения, имеющего размер 128×128. ответ дайте в кб. составить...

hollok 14.09.2020 12:52

Какие общие ресурсы могут быть представлены пользователем компьютерной сети...

vikulovatanya 13.09.2020 12:19

4)m= , если значение внешнего цикла уменьшить на 1. 5)m= , если значение внутреннего цикла увеличить на 2.Заполни пропуски при текущих значениях переменных k=12, m=4....

ДашаЛис56 10.07.2019 03:20

Какими устройствами в которых используются флеш карты вы пользуетесь какой у них информационный объем...

АннаЛітвін 10.07.2019 03:20

Pascal! в одномерном массиве, состоящем из n вещественных элементов, вычислить: номер минимального элемента массива и сумму элементов массива, расположенных между первым...

andreyffyff 10.07.2019 03:20

Дано слово форматирование . используя все возможные сначала функции, а потом процедуры получить как можно больше новых слов....

Вычислить произведение y=arctg 4 * arctg 6 * arctg 8 * * arctg t. t - чётное, задается с клавиатуры.

Популярные вопросы