Информатика Архивный вопрос

Написать функцию на языке Pascal

Написать функцию на языке Pascal
Нет комментариев

Ответы

Гость

Var
 y : real;
begin
  for var i:=1 to 25 do
    y:= y + (i+2)/(i*(3*i+1));
  writeln(y);
end.

Нет комментариев

Похожие вопросы