617

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

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

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

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

Русский

2013-01-06

50 KB

37 чел.

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

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

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

Лабораторная работа №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


 

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

13394. Створення шаблону в AutoCAD 12 83.5 KB
  Дисципліна ОКТБ ЛР № 9. Тема роботи: створення шаблону. Мета роботи: систематизувати теоретичні знання роботи з файлами повторити команди створення та редагування примітивів в програмі AutoCAD. Обладнання: ПК AutoCAD 12 Завдання для лабораторної роботи. Відкрит
13395. Робота з видовими екранами, компоновка аркуша 17.52 KB
  Дисципліна ОКТБ ЛР № 10. Тема роботи: робота з видовими екранами компоновка аркуша. Мета роботи: отримати практичні навички з видовими екранами. Обладнання: ПК AutoCAD 812 Теоретичні відомості. Видовим екраном називається ділянка графічного екрана де відображаєть...
13396. Створення об’єктів за допомогою інструмента «Коробка» 118.48 KB
  Лабораторна робота № 11. Тема: Створення обєктів за допомогою інструмента Коробка. Мета: навчитись будувати твердотільні моделі заданого розміру та розташування в просторі за допомогою інструменту Коробка. Обладнання: AutoCAD 2008 AutoCAD 2012 ПК. Теоретичні відомості...
13397. Створення пустотілих об’єктів за допомогою інструмента «Віднімання» 43.62 KB
  Лабораторна робота № 12. Тема: Створення пустотілих обєктів за допомогою інструмента Віднімання Мета: отримати практичні навички при виконанні операцій з твердотільними обєктами Обладнання: AutoCAD 2008 AutoCAD 2012 ПК. Теоретичні відомості. Трехмерная компьютерна
13398. Створення плоских поверхонь по двох точках з використанням повороту КСК 13.41 KB
  Лабораторна робота № 13. Тема: Створення плоских поверхонь по двох точках з використанням повороту КСК. Мета: отримати практичні навички при виконанні операцій з твердотільними обєктами Обладнання: AutoCAD 2008 AutoCAD 2012 ПК. Теоретичні відомості. Трехмерна
13399. Використання джерел світла і тіні 12.85 KB
  Лабораторна робота № 14. Тема: Використання джерел світла і тіні. Мета: навчитись використовувати різні джерела світла. Обладнання: AutoCAD 2008 AutoCAD 2012 ПК. Теоретичні відомості: при виконанні ЛР можна скористатись відеоуроком Lesson_10 який можна знайти на спільному ресурс
13400. Робота з командами AutoCAD. Побудова базових об’єктів 1.25 MB
  Тема: Робота з командами AutoCAD. Побудова базових обєктів. Мета: Закріпити знання команди line Ознайомитися з командами offset fillet та особливостями їх використання засвоїти прийоми побудови нескладного плану кімнати. Обладнання: ПК пр...
13401. Зміна стилю розмірності, виставлення лінійних розмірів в плані 124.5 KB
  Тема: Зміна стилю розмірності виставлення лінійних розмірів в плані. Мета: Навчитись створювати розмірний стиль та виставляти реальні розміри в плані приміщення. Розвивати навички побудови плану. Обладнання: ПК програмне забезп...
13402. Використання команд модифікації для зображення дверей та вікон. Вставка та створення блоків 153.5 KB
  Тема: Використання команд модифікації для зображення дверей та вікон. Вставка та створення блоків. Мета: Вдосконалити практичні навички роботи з командами редагування побудови подібних offset розширення extend обрізання trim. Отримати практичні навички...