Решение задачи на Паскаль, оператор While. Прошу, помогите, срочно прямо сейчас!!
Решение задачи на Паскаль, оператор While. Прошу, помогите, срочно прямо сейчас!!
Гость
Ответ(ы) на вопрос:
ГостьПопробуйте такой вариант:
programm one
var n, i: integer;
S: real;
begin
readln(n);
while(i != n)
begin
s := s + 1/((2*n+1)*(2*n+1));
i = i+1;
end;
writeln(s);
readln();
end.
Не нашли ответ?
Похожие вопросы