Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
2 / 2 / 1
Регистрация: 21.01.2013
Сообщений: 14

Даны действительные a,b,c. Получить g(a,c) * g(a,b), где g (x,y) = cos(x+y) * cos(x-y)

10.06.2013, 19:06. Показов 1203. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var x,y,y1,j1,j2:real;
Function  g(a,b,c:  real): real;
begin
j1:=(cos(a+c)*cos(a-c));
j2:=(cos(a+b)*cos(a-b));
end;
begin
clrscr;
Writeln('Введите x,y,y1: ');
Readln(x,y,y1);
g(x,y,y1);
writeln('g1*g2=',j1*j2);
readln;
end.
Где здесь ошибка. Я ваще не понял преподавателя?
Тема была: Подпрограммы. Функции.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
10.06.2013, 19:06
Ответы с готовыми решениями:

Где здесь ошибка, заранее спасибо. Условие:Вычислить значение суммы cos(x)+cos(cos(x)+.+cos(cos(.cos(x).) n раз
Sub max3() Dim s As Double Dim n, i, t, j As Integer n = Cells(1, 1) x = Cells(1, 2) s = 0 t = Cos(x) For i = 1 To n j =...

Рекурсия. Вычислить рекурсивно функцию вида y=cos(x)+cos(x^2)+cos(x^3)+...+cos(x^n).
У меня задание вычислить рекурсивно функцию вида y=cos(x)+cos(x^2)+cos(x^3)+...+cos(x^n). Но мне кажется что работает она неправильно и я...

Составить программу. Вычислить y=cos x+cos 2x+cos 3x+.+cos 30x
Составить программу. Вычислить y=cos x+cos 2x+cos 3x+...+cos 30x

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
10.06.2013, 19:06
Помогаю со студенческими работами здесь

Как вычислить y=cos 1(+cos(2+.+cos(39+cos 40).) без рекурсии?
Помогите, пожалуйста... 1)как вычислить y=cos 1(+cos(2+...+cos(39+cos 40)...)) без рекурсии?

Найти для заданного N>0 наименьший отрезок, содержащий все числа cos 1, cos 2, ..., cos N
Добрый день. Помогите, пожалуйста, решить две задачки. Заранее большое спасибо! 2)) Найти для заданного N>0 наименьший отрезок,...

Вычислить y=cosx+cos^2x+cos^2x+cos^3x+...+cos^10x
2) Вычислить y=cosx+cos^2x+cos^2x+cos^3x+...+cos^10x; ...

Вычислить значение функции cos(cos(cos(a+b))+c) для a, b и c , введённых с клавиатуры
Напишите программу, которая вычисляет значение функции cos(cos(cos(a+b))+c) для a, b и c , введённых с клавиатуры. Результат, округлённый...

График: f(x)= cos x -(4/15П)*cos 4x где -2П<=x<=4П с шагом h
f(x)= cos x -(4/15П)*cos 4x где -2П&lt;=x&lt;=4П с шагом h заранее спасибо


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Настройка записи справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru