46403

Составление программ циклической структуры

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

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

Изучить основные операторы для организации циклов. Разработать алгоритм решения задачи. Составить программу решения задачи. Вычислить на ЭВМ значение интеграла на отрезке. Число разбиений отрезка интегрирования равен 100, метод интегрирования – метод трапеций.

Русский

2014-10-19

64 KB

3 чел.

КОМИТЕТ ПО ОБРАЗОВАНИЮ МОСКОВСОЙ ОБЛАСТИ ГОСУДАРСТВЕННОЕ БЮДЖЕТНОЕ ОБРАЗОВАТЕЛЬНОЕ УЧЕРЕЖДЕНИЕ СРЕДНЕГО ПРОФЕССИОНАЛЬНОГО ОБРАЗОВАНИЯ МОСКОВСКОЙ ОБЛАСТИ

«СЕРПУХОВСКИЙ ТЕХНИЧЕСКИЙ КОЛЛЕДЖ»

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

По дисциплине «Основы программирования»

Составление программ циклической структуры.

Выполнил:

Студент 2-го курса 2-П гр

Исаев Валентин

Принял:

Преподаватель Щербаков К.В.

Серпухов 2013

Цель работы:

1. Изучить основные операторы для организации циклов.

2. Разработать алгоритм решения задачи.

3. Составить программу решения задачи.

Оборудование:

1. Персональный компьютер

2. Программа Turbo Pascal 

Задание 1.

Вычислить значение функций F(x)=tg2x-3 на отрезке [-П/4;П/4] с шагом

h=(b-a)/n, n=10. Результат представить в виде таблицы, первый столбец – значение аргумента, второй – соответствующие значения функции.

Блок-схема программы.   

                                                                                                 

 

Листинг программы.

Program Project1;

uses

  CRT;

var

  a,b,h,x,n,y:real;

begin

     a:=-PI/4;

     b:=PI/4;

     n:=10;

     h:=(b-a)/n;

     x:=a;

while (x<=b) do

begin

     y:=tan(2*x)-3;

  write('x=', x:1:3, ' '); writeln('y=', fx:1:3);

     x:=x+h;

end;

  readkey();

end.

Результат выполнения программы.

Задание 2.

Вычислить на ЭВМ значение интеграла на отрезке [-2;1]. Число разбиений отрезка интегрирования равен 100, метод интегрирования – метод трапеций.

Блок-схема программы.

  

 

Листинг программы:

Program Project1;

uses

  CRT;

var

  a,b,S,h,integ: real;

  i,n: integer;

function f(x: real): real;

begin

     f:=(3*x*x)/(x+4);

end;

begin

     a:=-2;

     b:=1;

     n:=100;

     h:=(b-a)/n;

for i:=1 to n-1 do

begin

     S:=s+f(a + h*i);

  integ:=h*((f(a)+f(b))/2+S);

  write('n=',i,' '); writeln('i=', integ:1:3);

end;

  readkey();

end.

Результат выполнения программы.

Вывод:

Изучил основные операторы для организации циклов.

Разработал алгоритм решения задачи.

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


 

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

60214. Овочева країна 70.5 KB
  На дошці напис Овочева країна мультимедійна презентація матеріали для конкурсів Слайд №2 Дивина така в природі: У бабусі на городі Різні овочі ростуть Розповзаються цвітуть. Виростила я чудові овочі.
60215. Свято «Прощавай, Букварику!» 119 KB
  На уроках читання ми познайомилися із казкою Муха Цокотуха і від нас тобі а також всім нашим батькам і гостям які завітали до нас на свято в дарунок ця казка. Мелодія Приходи Казка Муха Цокотуха Автор: Ось на воліпід дубком жила Муха під листком.
60216. Інтегрований виховний захід: «Країна чаю» 687 KB
  Мета: розширити знання учнів про чай історію його виникнення територію поширення та цілющі властивості ознайомити учнів з китайською та британською технологіями заварювання чаю поєднати знання учнів з ряду предметів історії географії...
60217. Математическое детективное агентство 139 KB
  Ведущие: Шерлок Холмс и доктор Ватсон. Звучит музыкальная заставка из х ф Шерлок Холмс и др Ватсон. Ватсон: Добрый день Холмс Шерлок Холмс: Добрый день Ватсон Ватсон: Вы просматривали утренние газеты Опять громкое дело...
60218. Здорові діти – здорове майбутнє 96.5 KB
  Кожна правильна відповідь кожне правильно виконане завдання будуть робити наших гостей чистішими та здоровішими. годинник Завдання: Режим дня кожна команда отримує набір карток з написами сніданок обід вечеря прогулянка...
60219. СТЕЖКАМИ РІДНОЇ ДОНЕЧЧИНИ! 179 KB
  Мета: нагадати учням про найславетніші місця рідного краю, символи; формувати громадянську позицію, сталий світогляд; розвивати вміння узагальнювати матеріал, робити висновки; виховувати почуття патріотизму...
60220. ЩО МИ ЗНАЄМО, ЩО ВМІЄМО 230.5 KB
  Методична розробка відкритого поза аудиторного заходу з дисципліни Навчальна практика з хімічного аналізу тугоплавких неметалевих і силікатних матеріалів і виробів.