1055581
столько раз учителя, ученики и родители
посетили сайт «Инфоурок»
за прошедшие 24 часа
+Добавить материал
и получить бесплатное
свидетельство о публикации
в СМИ №ФС77-60625 от 20.01.2015
Дистанционные курсы профессиональной переподготовки и повышения квалификации для педагогов

Дистанционные курсы для педагогов - курсы профессиональной переподготовки от 1.410 руб.;
- курсы повышения квалификации от 430 руб.
Московские документы для аттестации

ВЫБРАТЬ КУРС СО СКИДКОЙ ДО 90%

ВНИМАНИЕ: Скидка действует ТОЛЬКО до конца апреля!

(Лицензия на осуществление образовательной деятельности №038767 выдана ООО "Столичный учебный центр", г.Москва)

ИнфоурокИнформатикаДругие методич. материалыПрограмма для расчета площади неправильных четырехугольников

Программа для расчета площади неправильных четырехугольников

библиотека
материалов
Скачать материал целиком можно бесплатно по ссылке внизу страницы.

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

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

На практике очень часто приходится вычислять площади неправильных четырехугольников. Например: необходимо вычислить площадь земельного участка или планируемого строительного объекта на участке являющимся неправильным четырехугольником. Могут быть и другие случаи, связанные с такими расчетами.

Для выполнения этой задачи необходимо измерить одну из диагоналей четырехугольника.

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

hello_html_m3de5e45d.png

a,b,c – стороны треугольника. Этим способом пользуются математики. Программирование же этой задачи создает возможности для быстрого расчета для большого диапазона входных данных.

Пример. Пусть некоторый четырехугольник имеет форму как показано на рисунке.

hello_html_6e0a705a.png

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

var S,s1,s2,a,b,c,d,m,p1,p2:real;

{где a,b,c,d,m – стороны четырехугольника, d - диагональ }

i:integer;

f:text;

begin

assign (f,'output.txt');

rewrite(f);

writeln(f,'d= | s1= | s2= | s=');

a:=15;b:=16;c:=8;M:=20;d:=19;

for i:=1 to 25 do

begin

p1:=(a+b+d)/2;

s1:=sqrt(p1*(p1-a)*(p1-b)*(p1-d));

p2:=(c+m+d)/2;

s2:=sqrt(p2*(p2-c)*(p2-m)*(p2-d));

s:=s1+s2;

writeln(f,d:4:2,' | ',s1:6:2,' | ',s2:6:2,' | ',s:6:2);

d:=d+0.2;

end; close(f);

end.

Ниже пример результатов для четырехугольника со сторонами

a:=15; b:=16; c:=8; m:=20; диагональю от d:=19 до 23,80 с шагом увеличения 0,2


hello_html_71e39b.png

Шаг увеличения диагонали можно выбрать любой. В данном случае шаг в 0.2 выбран исходя из практических соображений. 0.2<<19. Таким образом выбор шага увеличения d зависит от требований точности для полученных результатов.

Общая информация

Номер материала: ДБ-232120

Вам будут интересны эти курсы:

Курс повышения квалификации «Информационные технологии в деятельности учителя физики»
Курс повышения квалификации «Современные информационные технологии и их использование в работе преподавателей. Системы автоматизированного проектирования одежды и организация технологического процесса»
Курс повышения квалификации «Внедрение системы компьютерной математики в процесс обучения математике в старших классах в рамках реализации ФГОС»
Курс повышения квалификации «Организация работы по формированию медиаграмотности и повышению уровня информационных компетенций всех участников образовательного процесса»
Курс профессиональной переподготовки «Информатика: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Облачные технологии в образовании»
Курс «Фирменный стиль» (Corel Draw, Photoshop)
Курс «Оператор персонального компьютера»
Курс профессиональной переподготовки «Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Использование компьютерных технологий в процессе обучения в условиях реализации ФГОС»
Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»
Курс повышения квалификации «Введение в программирование на языке С (СИ)»
Курс профессиональной переподготовки «Теория и методика обучения информатике в начальной школе»
Курс повышения квалификации «Современные тенденции цифровизации образования»
Курс повышения квалификации «Современные языки программирования интегрированной оболочки Microsoft Visual Studio C# NET., C++. NET, VB.NET. с использованием структурного и объектно-ориентированного методов разработки корпоративных систем»

Благодарность за вклад в развитие крупнейшей онлайн-библиотеки методических разработок для учителей

Опубликуйте минимум 3 материала, чтобы БЕСПЛАТНО получить и скачать данную благодарность

Сертификат о создании сайта

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

Грамота за использование ИКТ в работе педагога

Опубликуйте минимум 10 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Свидетельство о представлении обобщённого педагогического опыта на Всероссийском уровне

Опубликуйте минимум 15 материалов, чтобы БЕСПЛАТНО получить и скачать данное cвидетельство

Грамота за высокий профессионализм, проявленный в процессе создания и развития собственного учительского сайта в рамках проекта "Инфоурок"

Опубликуйте минимум 20 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Грамота за активное участие в работе над повышением качества образования совместно с проектом "Инфоурок"

Опубликуйте минимум 25 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Почётная грамота за научно-просветительскую и образовательную деятельность в рамках проекта "Инфоурок"

Опубликуйте минимум 40 материалов, чтобы БЕСПЛАТНО получить и скачать данную почётную грамоту

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