Предмет: Информатика,
автор: iqwinsa
Создайте программу для нахождения суммы ряда:
S=2x^1+3x^2+4x^3+5x^4+...+20x^19
PASCALABC.
Ответы
Автор ответа:
0
var
a,s,i:integer;
begin
s:=0; a:=1;
for i:=1 to 19 do begin
s:=s+inc(i)^a;
inc(a);
end;
writeln(s);
end.
a,s,i:integer;
begin
s:=0; a:=1;
for i:=1 to 19 do begin
s:=s+inc(i)^a;
inc(a);
end;
writeln(s);
end.
Похожие вопросы
Предмет: Музыка,
автор: nalivajkonasta75517
Предмет: История,
автор: elenasport
Предмет: Литература,
автор: fatimakhasanovna
Предмет: Информатика,
автор: Ferrar
Предмет: Биология,
автор: 270101max