Даны a и n. Вычислите S=(a+1)^2+(a+2)^2+…+(a+n)^2 в Паскале,очень нужно прошу помогите

0 голосов
28 просмотров

Даны a и n. Вычислите S=(a+1)^2+(a+2)^2+…+(a+n)^2 в Паскале,очень нужно прошу помогите


Информатика (15 баллов) | 28 просмотров
Дан 1 ответ
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
(150k баллов)
0

спасибо,но можно более расписано чтобы в начале был var, затем после значений begin и в конце уже вывести s?буду признателен,а то данный формат записи мне не очень ясен