Предмет: Информатика,
автор: wertigo22
Составить программу вычисления суммы для любого натурального числа n и вычислить ее для n=12:
Приложения:
Ответы
Автор ответа:
0
Program calculus;var a,b,n:integer;beginwrite('Введите число a');read(a);write('Введите число b');read(b);n:=a+b;write('Сумма a+b=');write(n);end.
MOZGcoder:
s:=0; for i:=1 to n do s:=s+1\(n*n*(1+n));
пиши жалобу, мне на этот сервис - ПОФИГ. Из-за того, что скучно сижу тут.
если хочешь, то отформатируй
Я точно не в хлеву воспитывался. Утверждаете про это, совсем неизвестного вам человека.
От комментарий нельзя точно узнать о воспитании человека.
Хоть я и вел себя на данном общении не воспитанно, но это ничего не значит.
Автор ответа:
0
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
Writeln('S=',SeqGen(n,i->(i+1)/(i+2)).Sum)
end.
Пример
n= 12
S=9.81986624486625
Во вложении дано точное решение в простых дробях и его приближение десятичной дробью с 20 знаками. Вычисление по приведенной программе различается на единицу в последнем разряде, что в данном случае является пределом точности машинной арифметики, принятой для переменных типа double.
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
Writeln('S=',SeqGen(n,i->(i+1)/(i+2)).Sum)
end.
Пример
n= 12
S=9.81986624486625
Во вложении дано точное решение в простых дробях и его приближение десятичной дробью с 20 знаками. Вычисление по приведенной программе различается на единицу в последнем разряде, что в данном случае является пределом точности машинной арифметики, принятой для переменных типа double.
Приложения:
Интересные вопросы
Предмет: Другие предметы,
автор: chayrmalove
Предмет: Алгебра,
автор: bill445rytytyi
Предмет: Немецкий язык,
автор: evyyyy
Предмет: Обществознание,
автор: shturmalizka
Предмет: Математика,
автор: sergei499