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.

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

Вывод:

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

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

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


 

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

6881. Побудова 3D-моделі рельєфа 1.21 MB
  Побудова 3D-моделі рельєфа. Одночасно відкриті в ENVI знімок та карта Використаємо створені на попередній лабораторній роботі файли карти для побудови тривимірної моделі поверхні. Для цього нам потрібна карта висот відповідної області...
6882. Магнітна індукція у феромагнетиках 215 KB
  Магнітна індукція у феромагнетиках Мета роботи: вивчення процесів, що відбуваються при намагнічуванні та перемагнічуванні тороидального феромагнітного сердечника. Зміст роботи і завдання 1. Ознайомитися з лабораторним макетом для зняття петель перем...
6883. Робота із мультиспектральними знімками. Класифікація 2.5 MB
  Робота із мультиспектральними знімками. Класифікація Більшість супутників, що проводять фотозйомку земної поверхні постачають дані не у вигляді кольорового зображення, а у вигляді декількох (інколи декількох десятків) монохромних зображень - по...
6884. Справочно-библиографический аппарат библиотеки 41.41 KB
  Справочно-библиографический аппарат библиотеки. Определение, состав и задачи справочно-библиографического аппарата (СБА) Согласно ГОСТ 7.26-80 Библиотечное дело. Основные термины и определения справочно-библиографический аппарат (СБА) библи...
6885. В чём заключается палеонтологический метод в геологии 26 KB
  В чём заключается палеонтологический метод в геологии? Объясните на примерах. Палеонтологический метод, метод определения относительного возраста осадочных толщ земной коры по сохранившимся в них ископаемым остаткам организмов. Используется для реше...
6886. Охарактеризуйте оболочки (геосферы) Земли. Приведите схему строения Земли 318 KB
  Охарактеризуйте оболочки (геосферы) Земли. Приведите схему строения Земли. Выделяются следующие геосферы: атмосфера, гидросфера, литосфера, земная кора, мантия и ядро Земли...
6887. Охарактеризуйте продукты вулканических извержений 33.5 KB
  Охарактеризуйте продукты вулканических извержений. При извержении вулкана выделяются продукты вулканической деятельности, которые могут быть жидкими, газообразными и твердыми. Газообразные - фумаролы и софиони, играют важную роль в вулканической дея...
6888. Охарактеризуйте землетрясения и их типы 31.5 KB
  Охарактеризуйте землетрясения и их типы. Ежегодно на всей Земле происходит около миллиона землетрясений, но большинство из них так незначительны, что они остаются незамеченными...
6889. Карст. Что такое карст и как он образуется 114 KB
  Что такое карст и как он образуется? Растворение некоторых горных пород вызывает целый ряд явлений, которые называются карстовыми. Слово карст обозначает такие формы рельефа, которые были образованы вследствие растворения горных пород, таких, напр...