Вопрос по информатике:
Вычислить значение суммы ряда sin0,5+cos1+sin1,5+...+cos3 аргументы вывести в табличном виде
Пожаловаться
- 13.09.2018 03:00
- Информатика
- remove_red_eye 9516
- thumb_up 15
Ответы и объяснения 1
// PascalABC.NET 3.2, сборка 1467 от 02.06.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Аргумент Функция');
var s:=0.0;
var x:=0.5;
var f:real;
var b:=true;
while x<=3 do begin
if b then f:=sin(x) else f:=cos(x);
Writeln(x:6:1,f:14:6);
b:=not b; x:=x+0.5; s:=s+f
end;
Writeln(' Сумма',s:13:6)
end.
Результат
Аргумент Функция
0.5 0.479426
1.0 0.540302
1.5 0.997495
2.0 -0.416147
2.5 0.598472
3.0 -0.989992
Сумма 1.209556
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Аргумент Функция');
var s:=0.0;
var x:=0.5;
var f:real;
var b:=true;
while x<=3 do begin
if b then f:=sin(x) else f:=cos(x);
Writeln(x:6:1,f:14:6);
b:=not b; x:=x+0.5; s:=s+f
end;
Writeln(' Сумма',s:13:6)
end.
Результат
Аргумент Функция
0.5 0.479426
1.0 0.540302
1.5 0.997495
2.0 -0.416147
2.5 0.598472
3.0 -0.989992
Сумма 1.209556
Пожаловаться
- 14.09.2018 21:25
- thumb_up 13
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы