Составьте программу заполнения одномерного массива пятью элементами, которые вы?

Составьте программу заполнения одномерного массива пятью элементами, которые вы??исляются по формуле A(i)=(2i-1)/(2i+1)
Гость
Ответ(ы) на вопрос:
Гость
Program n1;  var a:array[1..5] of real;  i:integer;  begin  for i:=1 to 5 do  begin  a[i]:=(2*i-1)/(2*i+1);  write(a[i],'  ');  end;  end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы