Ответы
Ответ дал:
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
Ответ дал:
0
спасибо,но можно более расписано чтобы в начале был var, затем после значений begin и в конце уже вывести s?буду признателен,а то данный формат записи мне не очень ясен
Ответ дал:
0
"Более расписано" - это будет уже просто другая программа". Если Вам нужны какие-то конкретные способы решения, об
Ответ дал:
0
об этом нужно писать в задании (указывать версию языка программирования, уровень используемых средств и т.п.)
Ответ дал:
0
А сейчас Вы просите фактически заново написать программу, потому что "так вот - непонятно". Но это, извините, не повод. Повод - четкие указания, что Вам нужно в результате и в каком виде. Учитесь уважать чужой труд и чужое время.
Вас заинтересует
2 года назад
2 года назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад