Adolas
5 год назад
ПОЖАЛУЙСТА требуется написать программу для вычисления суммы S =1+3+5+7...+(2n-1)значение n вводится пользователем.
ОТВЕТЫ
Gardner Shanon
Oct 24, 2020
program remdigga;
var S,N,i:real;
begin
S:=1+3+5+7;
i:=N;
while S+N do
begin
S:=S+2*i-1;
i:=i-1;
end;
var S,N,i:real;
begin
S:=1+3+5+7;
i:=N;
while S+N do
begin
S:=S+2*i-1;
i:=i-1;
end;
921
