Даны a и n. Вычислите S=(a+1)^2+(a+2)^2+…+(a+n)^2 в Паскале,очень нужно прошу помогите
Ответы на вопрос
Ответил Аноним
0
// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
var n:=ReadInteger('n=');
var a:=ReadReal('a=');
Writeln('S=',SeqGen(n,i->sqr(a+i),1).Sum)
end.
Пример
n= 10
a= 3.7
S=928.9
begin
var n:=ReadInteger('n=');
var a:=ReadReal('a=');
Writeln('S=',SeqGen(n,i->sqr(a+i),1).Sum)
end.
Пример
n= 10
a= 3.7
S=928.9
Ответил alexgogo2099
0
спасибо,но можно более расписано чтобы в начале был var, затем после значений begin и в конце уже вывести s?буду признателен,а то данный формат записи мне не очень ясен
Ответил Аноним
0
"Более расписано" - это будет уже просто другая программа". Если Вам нужны какие-то конкретные способы решения, об
Ответил Аноним
0
об этом нужно писать в задании (указывать версию языка программирования, уровень используемых средств и т.п.)
Ответил Аноним
0
А сейчас Вы просите фактически заново написать программу, потому что "так вот - непонятно". Но это, извините, не повод. Повод - четкие указания, что Вам нужно в результате и в каком виде. Учитесь уважать чужой труд и чужое время.
Новые вопросы
Литература,
2 года назад
Немецкий язык,
2 года назад
Математика,
8 лет назад
География,
9 лет назад
Обществознание,
9 лет назад