Матеріал  до уроку інформатики.

10 клас

Розділ: Моделі і моделювання.  Аналіз та візуалізація даних.

 

Комп’ютерне моделювання процесу виконання задачі.

Знаходження площі трикутника за допомогою  формули Герона.

Використаємо можливості:  

Lazarus,  Turbo Pascal,  Microsoft Exsel

 

 

 

 

 

 

 

 

Створимо програму у Lazarus для обчислення площі трикутника за формулою Герона

 

Створюємо форму такого вигляду:

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Описуємо назви компонентів:

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Вводимо опис формули у редактор тексту:

 

 

Компілюємо результат:

Створимо програму у Turbo Pascal , використовуємо- Pascal ABC.net для обчислення площі трикутника за формулою Герона

 

Program Geron;

Var p, St, A, B, C : Real; begin

writeln('Площа трикутника за формулою Герона '); write('Введіть стороны трикутника '); readln(A, B, C);

if (A+B>C) AND (A+C>B) AND (B+C>A) then begin { Перевірити існування трикутника з даними сторонами }

p := (A + B + C) / 2; { Знайти півпериметр трикутника }

St := Sqrt(p * (p - a) * (p - b) * (p - c)); { Обчислити площу } writeln('Площа трикутника ', St:8:5) end

else writeln('Трикутник з такими сторонами не існує') end.

 

 

 

 

 

 

Результат:

 

 

 

 

 

 

Виконаємо  обчислення площі трикутника за формулою Герона у Microsoft Exsel:

 

Створюємо вигляд (довільний)-

 

 

 

Знаходимо півпериметр –

 

 

 

 

Описуємо формулу Герона  (для нашого випадку)- 

 

 

 

 

Отримуємо результат-