46403

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

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

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

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

Русский

2014-10-19

64 KB

2 чел.

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

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

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

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

Вывод:

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

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

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


 

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

74182. НОВЕЙШИЕ ВЕРТИКАЛЬНЫЕ ТЕКТОНИЧЕСКИЕ ДВИЖЕНИЯ И МЕТОДЫ ИХ ИЗУЧЕНИЯ 13.37 KB
  Новейшие тектонические движения происходили с конца палеогена до четвертичного периода. Эти движения создали все формы мега и макрорельефа существующие сейчас в пределах материков и океанов поэтому их изучают в основном геоморфологическими а также биогеографическими методами.
74183. Радиогеохронологические методы 13.6 KB
  Метод определения абсолютного возраста изотопный радиологический метод – метод определения истинной продолжительности отдельных геохронологических единиц в тысячах и миллионах лет. В отличие от методов относительного возраста методы абсолютного возраста дают возможность определить возраст магматических метаморфических и осадочных горных пород...
74186. Метод мощностей (понятие, назначение, применение) 13.99 KB
  Метод мощностей понятие назначение применение Данный метод применяется для изучения древних в меньшей степени новейших нисходящих вертикальных движений. При анализе мощностей необходимо учитывать следующее: Анализ мощностей основывается на изучении таких...
74187. Платформы (понятие, строение: фундамент, осадочный чехол) 11.14 KB
  Платформы понятие строение: фундамент осадочный чехол Платформа – это обширная тектоническая структура обладающая сравнительно малой подвижностью. Платформы образуется на месте складчатой области в результате разрушения и снижения гор...
74188. Object-oriented programming languages and tools 37 KB
  They were working on simultions tht del with exploding ships nd relized they could group the ships into different ctegories. The Smlltlk tem ws inspired by the Simul 67 project but they designed Smlltlk so tht it would be dynmic. The objects could be chnged creted or deleted nd this ws different from the sttic systems tht were commonly used. It is this feture tht llowed Smlltlk to surpss both Simul 67 nd the nlog progrmming systems.
74189. Object-oriented programming languages and tools. Evolution of Smalltalk 41 KB
  The lnguge ws first generlly relesed s Smlltlk80. Smlltlklike lnguges re in continuing ctive development nd hve gthered loyl communities of users round them. NSI Smlltlk ws rtified in 1998 nd represents the stndrd version of Smlltlk.
74190. Logic programming languages and tools 38 KB
  User specifies the specifictions of solution nd the computer derives the execution sequence for tht solution: Let us hve irline flight informtion of the form: flightflight_number from_city to_city deprture_time rrivl_time Then ll the flights from Wshington DC to Snt Clr cn be specified s either direct flights or s flights with n intermedite stop: flightflight_number DC Snt Clr deprture_time rrivl_time or flightflight_number DC X deprt1 rrive1 flightflight_number X Los ngles deprt2 rrive2 deprt2 =rrive130 Unlike...