Lab7 (1018845)

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

Текст из файла

ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ

МОСКОВСКИЙ ГОСУДАРСТВЕННЫЙ ИНСТИТУТ РАДИОТЕХНИКИ, ЭЛЕКТРОНИКИ И

АВТОМАТИКИ

(ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ)

Кафедра РПУ

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

Тема: “Процедуры и функции”

Вариант №4

Цель работы: приобрести навыки разработки программ с подпрограммами.

работу выполнил

группа ВР-1-08

проверил: Давлетчин Д.И.

Москва 2009

Постановка задачи. Сформировать матрицу C(5,5), элементы которой являются значениями определенного интеграла

Условие. Метод интегрирования – метод Веддля. f(x)=1/cos(3x)

Метод Веддля.

Метод базируется на применении к каждому из n элементарных отрезков [x₁,x₇] длиной h=(b-a)/n формулы:

где xi=x1+z(i-1), i=2,3,4,5,6,7, z=h/6.

.

Программа

program lab7;

uses crt;

const E=0.1;

var c,d,nx,i:integer;J1,J2:real;

t1:array [1..5,1..5] of real;

function fx(x:real):real;

begin

fx:=1/cos(3*x);

end;

function mv(a,b:real; n:integer):real;

var z,h:real;

xi:array [1..6] of real;

begin

h:=(b-a)/n;

z:=h/6;

for i:=1 to 6 do xi[i]:=a+z*i;

for i:=1 to n do mv:=mv+(3*z/10)*(fx(a)+5*fx(xi[1])+fx(xi[2])+6*fx(xi[3])+fx(xi[4])+5*fx(xi[5])+fx(xi[6]));

end;

begin

clrscr;

for c:=1 to 5 do

begin

for d:=1 to 5 do

begin

nx:=3;

repeat

begin

J1:=mv(c/20,(c+d)/20,nx);

nx:=2*nx;

J2:=mv(c/20,(c+d)/20,nx);

end;

until abs(J1-J2)<E;

t1[c,d]:=J2;

end;end;

for c:=1 to 5 do for d:=1 to 5 do writeln(t1[c,d]);

readkey

end.

Характеристики

Тип файла документ

Документы такого типа открываются такими программами, как Microsoft Office Word на компьютерах Windows, Apple Pages на компьютерах Mac, Open Office - бесплатная альтернатива на различных платформах, в том числе Linux. Наиболее простым и современным решением будут Google документы, так как открываются онлайн без скачивания прямо в браузере на любой платформе. Существуют российские качественные аналоги, например от Яндекса.

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

Файлы такого типа обычно разбиты на страницы, а текст может быть форматированным (жирный, курсив, выбор шрифта, таблицы и т.п.), а также в него можно добавлять изображения. Формат идеально подходит для рефератов, докладов и РПЗ курсовых проектов, которые необходимо распечатать. Кстати перед печатью также сохраняйте файл в PDF, так как принтер может начудить со шрифтами.

Список файлов лабораторной работы