Решите задачу-1 (Паскаль 7 класс) пожалуйста .Постарайтесь не сложным путем,а то учитель не поверит.))ДАЮ 30 БАЛОВ
Решите задачу-1 (Паскаль 7 класс) пожалуйста .Постарайтесь не сложным путем,а то учитель не поверит.))ДАЮ 30 БАЛОВ
Гость
Ответ(ы) на вопрос:
Гостьvar i,n:integer; a,s:real;
begin
write('n = '); readln(n);
s:=24;
for i:=1 to n-1 do
begin
a:=(2*i-1)*(2*i)/(4*i);
s:=s+a;
end;
writeln('s = ',s);
end.
Пример:
n = 5
s = 36.5
ГостьПеределал, как написали в комментариях
var s,k:real; i,n:integer;
begin
write('n=');
read(n);
s:=24;
for i:=1 to n-1 do begin
k:=(2*i-1)*(2*i)/(4*i);
s:=s+k;
end;
write('sum=',s)
end.
Не нашли ответ?
Похожие вопросы