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


 

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

77201. Выборы Президента РФ 871 KB
  Граждане Российской Федерации обладающие пассивным избирательным правом могут быть выдвинуты кандидатами непосредственно либо в составе списка кандидатов в соответствии с настоящим Федеральным законом иным законом.
77202. Вредители бобовых культур 86.5 KB
  Основные вредители гороха и меры борьбы с ними. Основные вредители люпина и система защитных мероприятий. Вредители многолетних бобовых трав. Интегрированная система защиты бобовых культур от вредителей...
77203. Формирование кадровой политики предприятия связи ОАО Липеком 739.5 KB
  Кадры управления менеджеры и их роль в процессе деятельности предприятия. Общая характеристика управления кадрами. Статья приложения структуры управления Липекома и статья приложения аудиторской проверки сканированы и отпечатаны с оригинала.
77204. Автоматизация отслеживания состояния покрытия автомобильных дорог 249.5 KB
  Общеизвестно что состояние дорожного покрытия на протяжённых участках автомобильных дорог как на территории Российской Федерации так и в некоторых других странах далеко от идеального. Характер и численность дефектов покрытия разнятся: на некоторых участках автомобилист может столкнуться...
77205. Декомпозиция временных рядов в СУБД Oracle 102 KB
  Целью данной работы являлось создание пакета процедур и функций с помощью которых можно было бы легко и эффективно манипулировать временными рядами в СУБД ORCLE. Для хранения информации о рядах создает отдельная таблица Timeseries в которой хранятся имя или идентификатор ряда...
77206. Разработка программного обеспечения системы программно-аппаратной защиты ПО 381.5 KB
  Данная курсовая работа является частью проекта по разработке системы программно-аппаратной защиты ПО. Данный комплекс представляет собой комбинированную систему, предназначенную для защиты коммерческого программного обеспечения от несанкционированного использования или для защиты...
77208. Поддержка языка Lisa в среде Eclipse 293 KB
  В компании Parallels ведётся разработка продукта StellArt IDE – среда программирования на основе Eclipse для языка Lisa. Я участвую в разработки данного продукта. Продукт разрабатывается по технологии Scrum, так что каждый месяц в течение всего периода разработки поставляется...
77209. Инструмент аспектно-ориентированного программирования Aspect.Java 628 KB
  Данная курсовая работа посвящена такой относительно новой методологии в разработке программного обеспечения как аспектно-ориентированное программирование. Суть данного подхода – поддержка разработки и модификации сквозной функциональности (cross-cutting concerns) в больших программных системах.