617

Вычисление сумм и произведений методом накопления

Лабораторная работа

Информатика, кибернетика и программирование

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

Русский

2013-01-06

50 KB

36 чел.

РОССИЙСКИЙ ГОСУДАРСТВЕННЫЙ СОЦИАЛЬНЫЙ УНИВЕРСИТЕТ

Факультет информационных технологий

Кафедра социальной и педагогической информатики

Лабораторная работа №3

Дисциплина: Программирование на языке высокого уровня.

ТЕМА: Вычисление сумм и произведений методом накопления.

Выполнила студентка 1 курса

ПОИ – Д – Б – 1 Бизюкина Анастасия

Проверил Денисов А. А.

Москва 2012

Цель работы: научиться вычислять суммы и произведения методом накопления в системе Turbo Pascal.

Ход работы:

  1.  Формальная постановка задачи:

Вычислить значение функции, содержащее алгебраическое произведение. Задано значение параметра x и количество множителей n.

  1.  Словесное описание алгоритма:
  2.  вводим исходные данные;
  3.  накопителю для произведения присваиваем 1;
  4.  в цикле вычисляем очередной множитель и домножаем его на накопитель.
  5.  выводим ответ на экран.
  6.  Таблица данных:

Исходные данные

Имя

Тип

Структура

Смысловое значение

Диапазон значения

Точность

Число позиций

n

Integer

Простая переменная

Количество слагаемых

minInteger<n<maxInteger

x

Real

Простая переменная

Заданные значения параметра

minReal<x<maxReal

2 знака после запятой

E10:2

Выходные данные - результат

P

Real

Простая переменная.

Искомое произведение

minReal<P<maxReal

2 знака после запятой

E10: 2

Промежуточные данные

i

Integer

Простая переменная

Индекс текущих множителей

1<i<n

  1.  Блок – схема алгоритма:

  1.  Текст программы:

Program proizvedenie;

var x, P: real;

     i, n: integer;

begin

readln( x,n);

P:=1;

fot i:=1 to n do

begin

P:=P*((i*ln(x)+3/7)/exp((i–1)*x/i));

end;

writeln( P);

readln;

end.

  1.  Пример работы программы:

Вывод: В рамках данной работы были выработаны практические навыки по вычислению произведения методом накопления в системе Turbo Pascal.

                    x, n

7                       P

STOP

6          i<n

5                     i:=i+1

4 P:=P*((i*ln(x)+3/7)/exp((i–1)*x/i))

3                                      i:=1

P:=1

нет

да

2


 

А также другие работы, которые могут Вас заинтересовать

4033. Методика расследования вымогательства 274 KB
  Одним из наиболее опасных посягательств на государственную или общественную собственность, а также на личные интересы граждан является вымогательство (как основная статья доходов организованной преступности), которое сравнительно быстро рас...
4034. Расследование преступлений по горячим следам 212.5 KB
  Введение Актуальность данной темы в теории современной криминалистики довольно высока. Данный вопрос мало изучен белорусскими криминалистами, хотя роль таких исследований оказывает наиболее «полезное» воздействие на состояние следственной практики. ...
4035. Оперативное управление, оперативный контроль на примере планово-диспетчерской службы газопромыслового управления ООО Газпром добыча Оренбург 211.5 KB
  Введение В условиях рыночных отношений обеспечить промышленному предприятию эффективное функционирование и конкурентные преимущества может только эффективная система управления его производственной деятельностью. Сегодня предприятие само должно опре...
4036. Планирование как функция менеджмента в современной организации 167 KB
  Введение Согласно Краткому Оксфордскому словарю, план – это подробное предложение сделать что-либо или добиться чего-либо. «Управлять компанией очень непросто», - отмечает Пол Барроу, но, как справедливо утверждает он далее, улучшив планировани...
4037. Оплата труда работников производственных предприятий на примере ОАО Тамбовский хлебокомбинат 168 KB
  Введение Заработная плата - оплата труда работников различных профессий, будь то неквалифицированные рабочие, или люди профессий, труд которых требует больших затрат на образование или работники сферы услуг. В условиях развития рыночных отношений оп...
4038. Виды и тенденции развития туризма. Деловой туризм 110 KB
  Самый динамичный сектор В наше время каждый четвертый из десятков миллионов человек, ежедневно покидающих свой дом, чтобы отправиться в поездки — ближние и дальние, краткосрочные и длительные, — делает это по служебной надобности. И весь...
4039. Разработка методических указаний для выполнения лабораторных работ с использованием компьютерной программы Рефлектометр 569.59 KB
  При построении телекоммуникационных сетей с ипользованием оптоволоконных кабелей важнейшим инструментом является оптический рефлектометр. Оптический рефлектометр – сложное и дорогое устройство, поэтому для его изучения была создана компьютерная программа, моделирующая работу оптического рефлектометра (ОР)...
4040. Социально-этические и гуманистические принципы биологического познания. Генетика и эволюция 108.5 KB
  Введение Современное человечество живет в новом тысячелетии и это заставляет людей уделять большее внимание своему будущему и разумному осмыслению нашего прошлого. Одним из важнейших стала проблема взаимодействия природы и общества. Противоречия меж...
4041. Криоэлектроника. История развития 255.5 KB
  Криоэлектроника. История развития Введение Криогенная (от греческого "криос" — холод, мороз) электроника, или криоэлектроника — направление электроники, охватывающее исследование при криогенных температурах (ниже 120 К) специфических эффек...