Процедуры и функции

10.12.2009, 14:58. Показов 396. Ответов 0

Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста мне !!!
Я решила задачу верно но нужно чтоб она же такая как у меня но решена была с помощью процедур я не могу вставить процедуру, помогите пожалуйста

Дано действительное число х. Вычислить с точностью 10 в-6 степени: сумма 1/x в квадрате+ к в кубе, где к от 1 до бесконечности

Pascal

program Z_758b;
uses crt;
var
 x,e,S,s1:real;
 k:longint;
 ch:char;
begin
clrscr;
 repeat
  writeln(‘введите х');
  readln(x);
  writeln(‘введите епсилон'); 
 
  readln(e);
  writeln('е= ',x:5:2);
  k:=1;
  S:=0;
  S1:=1/(x*x+1);
  repeat
   S:=S+s1;
   k:=k+1;
   s1:=1/(x*x+k*k*k);
  until abs(s1)<e;
  writeln('k = ',k);
  writeln('сумма=',S:9:6);
  writeln('нажмите у для продолжения');
  readln(ch);
  until ch<>'y';
end.

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

10.12.2009, 14:58

Ответы с готовыми решениями:

Функции и процедуры. При помощи процедуры записать слова задом наперед
Дана строка S, состоящая из не менее 5 слов. При помощи процедуры записать слова задом наперед....

Задачник Абрамян. Процедуры и функции. Процедуры с числовыми параметрами
Описать процедуру RectPS(x1, y1, x2, y2, P, S), вычисляющую периметр P и площадь S прямоугольника...

Какие процедуры и функции вызываются из заданной процедуры
Подскажите, каким образом, используя сведения из представлений словаря данных, получить информацию...

Процедуры и функции. Процедуры с числовыми параметрами
Описать процедуру RectPS (x1, y1, x2, y2, P, S), вычисляющую периметр P и площадь S прямоугольника...

	10.12.2009, 14:58

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

10.12.2009, 14:58

Помогаю со студенческими работами здесь

Процедуры и функции. Процедуры с числовыми параметрами
Процедуры и функции. Процедуры с числовыми параметрами Всем привет, помогите пожалуйста сделать...

Процедуры и функции: решить через процедуры S=a*x+b*y+c*z.
Пожалуста помогите решить через процедуры S=a*x+b*y+c*z.

Подпрограммы-процедуры и процедуры-функции
Мне надо вычислить приближенное значение интеграла с помощью подпрограммы-процедуры и...

Процедуры и функции: вычислить значения функции на заданном отрезке с заданным шагом
ребята, помогите, пожалуйста! Срочно нужна такая программка по выделенному варианту... у самой...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Опции темы

Наверх