Учебная работа. Курсовая работа: Составление программ для решения задач на языке программирования Turbo Pascal 2

1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (Пока оценок нет)
Загрузка...
Контрольные рефераты

Учебная работа. Курсовая работа: Составление программ для решения задач на языке программирования Turbo Pascal 2

Министерство образования Русской Федерации

КФ УГАТУ

Кафедра “промышленной автоматики”

Курсовая работа

по дисциплинам «информатика», «программирование и базы алгоритмизации»

на тему «Составление программ для решения задач

на языке программирования
Turbo
Pascal
»


Кумертау

2010

ВВЕДЕНИЕ

С развитием информатики информация становиться стратегическим ресурсом общества, аналогичным по значимости с припасами сырья, энергии и т.д.

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

Информатика является одной из самых быстроразвивающихся направлений развития людского общества.

Опосля исследования информатики студент должен

— главные методы и формы представления числовой, символьной, графической, звуковой инфы,

— технические и программные средства информатики.

Опосля исследования информатики студент должен приобрести способности алгоритмизации и программирования задач решаемых на ПК .

При выполнении курсовой работы приобретаются способности и умения разработки программ для решения задач на ЭВМ .

В курсовой работе изучаются все этапы алгоритмизации и программирования определенной вычислительной задачки на языке программирования Турбо-Раскаль,

1 УСЛОВИЕ задачки

— Отыскать первую производную,

— Отыскать вторую производную,

— Отыскать критичную точку, если это может быть, по знаку 2-ой производной найти тип экстремума в критичной точке (максимум либо минимум),

— Отыскать наибольшее y
на данном интервале [
1



2

].

II. Табулировать заданную квадратичную функцию на данном интервале [
1



2

] с шагом .

Примечание:

значения переменных




1



2

являются целыми числами, и должны вводиться с клавиатуры по запросу программки.

  • Начальная функция
  • Начальный интервал
    от …… до
  • Перваяпроизводная


  • 2-ая производная

  • Критичная точка х1
    =…………

  • значения функции







  • 1




    =……. – (малое либо наибольшее значение


    )







    1




    =……. – (малое либо наибольшее


    )







    2




    =……. – (малое либо наибольшее


    )


    Табулирование функции


    с шагом




    ——————————————————-

    !
    N
    !
    x
    !
    y
    !
    y
    ’ !

    ——————————————————-

    ! 1 ! ! ! !

    ! 2 ! ! ! !

    ….

    Пусть задана функция на интервале

    2.
    Постановка задачки

    2.1
    Описание входной инфы

    Входной информацией именуется информация, которая считается известной до начала решения задачки, её запрашивают у юзера и вводят с клавиатуры оператором READLNили из файла на диске.

    Приведем описание входной инфы в таблице №1 так, в согласовании с текстом программки.

    Таблица №1 — Описание входной инфы


    Заглавие переменной
    Тип переменной
    Предназначение



    Integer (целый)
    Коэффициенты функции



    Integer (целый)



    Integer (целый)



    Integer (целый)
    Начало данного интервала



    Integer (целый)
    Конец данного интервала

    2.2
    Описание промежной инфы

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

    Приведем описание промежной инфы в таблице №2 так, в согласовании с текстом программки.

    Таблица №2 — Описание промежной инфы


    Заглавие переменной
    Тип переменной
    Предназначение



    real (вещественный)
    H

    real (вещественный)
    Шаг табуляции



    Integer(целый)
    Номер шага

    2.3
    Описание выходной инфы

    Выходной информацией именуется информация, которую нужно найти при решении задачки, её рассчитывают по формулам и выводят на экран либо печать оператором WRITE(WRITELN) либо в файл на диске.

    Приведем описание выходной инфы в таблице №3 так, в согласовании с текстом программки.

    Таблица №3 — Описание выходной инфы


    Заглавие переменной
    Тип перемен-ной
    Предназначение



    REAL(вещественный)
    Yt

    REAL(вещественный)
    Yp

    REAL(вещественный)
    F1

    REAL(вещественный)
    F2

    REAL(вещественный)



    REAL(вещественный

    3.
    Формализация задачки (либо словесно-формульное описание)

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

    Начальная функция (1)

    1-ая производная (2)

    2-ая производная

    Критичная точка, где .Если , то решить задачку нереально.

    Если , то находим :

    — экстремум функции : если




    1


    , то х1

    – точка минимума, если




    1


    , то х1

    – точка максимума,

    — у(а1
    )

    , у(х1
    )

    и у(а2
    )

    , посреди которых описывает наибольшее и меньшее

    На данном интервале [
    1



    2

    ] рассчитаем шаг табулирования функции .

    Для табулирования функции первой х=а1

    Последующее х=x+h

    Крайнее значение


    2

    ,

    Значение
    рассчитывается по формуле (1),

    — по формуле (2)

    4.
    метод задачки

    Для решения данной задачки использовались внутренние процедуры и функции, потому в этом разделе представлены методы главный (главной программки) и методы каждой из подпрограмм – таблица № 4.

    Таблица №4 – Описание подпрограмм


    Идентификатор подпрограммы
    Тип подпрограммы
    Возвращаемые величины
    Предназначение



    Функция


    Вычисляет dy

    Вычисляет первую производную

    Min_max2
    Процедура
    -
    Описывает минимум и максимум из 2-ух величин F1 и F2

    Min_max3
    Процедура
    -
    Описывает минимум и максимум из 3-х величин F1, F2, F3

    метод главный программки представлен на рис. 1.

    Набросок 1 – Логическая схема главный программки

    метод функции
    представлен на рис. 2

    Набросок 2 – Логическая схема подпрограммы – функции

    метод функции
    представлен на рис. 3.

    Набросок 3 – Логическая схема подпрограммы — функции

    метод подпрограммы min_max_2 представлен на рис. 4.

    Набросок 4 – Логическая схема подпрограммы-процедуры min_max_2

    метод подпрограммы min_max_3 представлен на рис. 5.

    Набросок 5 – Логическая схема подпрограммы-процедуры min_max3

    5 ПОСТРОЕНИЕ ПРОЦЕССА РЕШЕНИЕ задачки

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

    program prog;

    label 1;

    var a,b,c,a1,a2:integer;

    min,max,f1,f2,f3:real;

    h,x,yt,yp,x1:real;

    i:integer;

    function y(x:real):real;

    begin

    y:=sqr(x)/a+x/b+c;

    end;

    function dy(x:real):real;

    begin

    dy:=2*x/a+1/b;

    end;

    procedure min_max2;

    begin

    if f1>f2 then

    begin {max:=f1; min:=f2; }

    writeln(‘наибольшее

    writeln(‘меньшее

    end;

    if f1<f2 then

    begin {max:=f2; min:=f1;}

    writeln(‘меньшее

    writeln(‘наибольшее

    end;

    end;

    procedure min_max3;

    begin

    if (f1>f2)and(f1>f3) then

    begin

    {max:=f1;}

    writeln(‘наибольшее

    if f2<f3 then {min:=f2} writeln(‘меньшее

    else {min:=f3} writeln(‘меньшее

    end

    else if (f2>f1)and (f2>f3) then

    begin

    {max:=f2;}

    writeln(‘наибольшее

    if f1<f3

    then {min:=f1}

    writeln(‘меньшее

    else {min:=f3}

    writeln(‘меньшее

    end

    else

    begin

    {max:=f3;}

    writeln(‘наибольшее

    if f1<f3

    then {min:=f1}

    writeln(‘меньшее

    else {min:=f3}

    writeln(‘меньшее

    end

    end;

    begin

    writeln(‘исследование функции вида y=xx/a+x/b+c’ );

    1:write(‘введите целые цисла а=’);readln(a);

    write(‘b=’);readln(b);

    write(‘c=’);readln(c);

    writeln(‘введитеинтервал :’);

    write(‘a1=’); readln(a1);

    write(‘a2=’); readln(a2);

    if a*b<>0 then

    begin

    x1:=-a/(2*b);

    f1:=y(a1);

    f2:=y(x1);

    f3:=y(a2);

    write(‘x=’,x1:5:3,’ — критическаяточка , y(x1)= ‘,y(x1):7:3);

    if a>0 then writeln (‘ — min’)

    else writeln (‘ — max’);

    min_max3;

    end

    else

    begin

    writeln(‘aи bне могут быть нулевыми’);goto 1;

    end;

    h:=абс(a1-a2)/10;

    x:=a1;

    i:=1;

    writeln (‘табулирование функции вида у=хх/a+х/b+с’);

    writeln (‘————————————‘);

    writeln (‘! N ! x ! y ! y p !’);

    writeln (‘————————————‘);

    repeat

    writeln(‘!’,i:4,’!’,x:7:2,’!’,y(x):9:3,’!’,dy(x):9:3,’!’);

    i:=i+1;

    x:=x+h;

    until x>a2;

    end.

    6 КОНТРОЛЬНЫЙ ПРИМЕР

    исследование функции вида y=xx/a+x/b+c

    введите целые цисла а=1

    b=1

    c=-1

    введите интервал :

    a1=0

    a2=1

    x=-0.500 — критичная точка , y(x1)= -1.250 — min

    наибольшее

    меньшее

    табулирование функции вида у=хх/a+х/b+с

    ————————————

    ! N ! x ! y ! y p !

    ————————————

    ! 1! 0.00! -1.000! 1.000!

    ! 2! 0.10! -0.890! 1.200!

    ! 3! 0.20! -0.760! 1.400!

    ! 4! 0.30! -0.610! 1.600!

    ! 5! 0.40! -0.440! 1.800!

    ! 6! 0.50! -0.250! 2.000!

    ! 7! 0.60! -0.040! 2.200!

    ! 8! 0.70! 0.190! 2.400!

    ! 9! 0.80! 0.440! 2.600!

    ! 10! 0.90! 0.710! 2.800!

    Заключение

    В курсовой работе представлено решение задачки исследования и табулирования квадратичной функции с случайными коэффициентами.

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

    По результатам контрольного примера задачка решена правильно. Программка отлажена в среде программирования TURBOPASCAL 7.0

    6 применяемая литература

    1. Информатика. Учебник. 3-е изд./Под ред. Проф. Н.В. Макаровой, М.:,2000.

    2. Информатика. Базисный курс., Симонович С.В. и др.СПб.: Питер. 2001.

    3. Новая энциклопедия индивидуального компа 2002, В.П. Леонтьев, М., “Олма-пресс”, 2002.

    4. Симонович С., Евсеев Г., Практическая информатика, учебное пособие, М.: АСТ-пресс,2000.

    5. Фаронов, TurboPascal 7.0., М.: Инфра-М,1998.

    6. Фигурнов В.Э.,IBMPC для юзеров, лаконичный курс, М.: Инфра-М, 1997.

    7. Могилев А.В., Пак Н.И., Хеннер Е.К., Информатика, Учебное пособие для студ. пед. вузов, 2-е изд., М.:Изд. центр “Академия”, 2001 – 816с.

    8. , Грачева Л.Н., Лекции по информатике

    9. Грачёва Л.Н., методические указания к курсовой работе по информатике для заочников, 2010 г.

    ]]>