Програмування лінійних алгоритмів на Pascal

Практична робота.

Програмування лінійних алгоритмів на Pascal

Записати програму мовою Pascal та протестувати її на правильність.

Завдання 1. Дано сторони прямокутника а і b. Знайти його площу S = a•b і периметр

P = 2( а + b), якщо а і b, S, P – дійсні числа.

Завдання 2. Даний діаметр кола d – дійсне число. Знайти її довжину L = π•d. Як значення π використовувати 3.14.  Вивести відповідь L, як дійсне число.

Завдання 3. Дано довжину ребра куба а - дійсне. Знайти об'єм куба V = a³ і площу його поверхні S = 6•a². Вивести відповіді V, S як дійсні числа.

Завдання 4. Дано довжини ребер а, b, з прямокутного паралелепіпеда. Знайти його об'єм V = a•b•c і площу поверхні S = 2•(a•b + b•c + a•c). Вивести відповіді V, S як дійсні числа.

Завдання 5. Знайти довжину кола L і площу круга S заданого радіусу R:

L = 2•π•R,    S = π•R². Як значення π використовувати 3.14. Вивести відповіді L, S як дійсні числа.

Завдання 6. Дано два цілі  числа а і b. Знайти: 1) їх середнє арифметичне:

C=(а + b)/2, де С - дійсне число; 2) остачу від ділення а на  b; {використати M:=а mod b}; 3) цілу частину від ділення а на  b; {використати N:=а div b}; 

Завдання 7. Дано два додатні числа а і b. Знайти: 1)їх середнє геометричне, тобто квадратний корінь з їх множення: (a*b)^0,5 =, {використати g := sqrt(a*b)}.

Завдання 8. Дані катети прямокутного трикутника aіb. Знайти гіпотенузу

 c ==(0,5a² +0,5b²)^0,5 і периметр P: P = а + b + с. {використати c:= sqrt(a*a +b*b)}.

Завдання 9. Дано два круги із спільним центром і радіусами R₁ і R₂ (R₁ > R₂). Знайти площі цих кругів S₁ і S₂, а також площу S₃ кільця, більший радіус якого рівний R₁, а менший  радіус рівний R₂:     S₁ = π•(R₁)²              S₂ = π•(R₂)²              S₃ = S₁- S₂.

Як значення π використовувати 3.14.

Завдання 10. Дано довжину L кола. Знайти його радіус R, та площу S круга, враховуючи, що довжина L = 2•π•R, звідки  R= L/(2•π),   а площа круга S = π•R².

Як значення π використовувати 3.14.

Завдання 11. Дано два дійсні числа a, b, де 0<b<a.  Знайти найбільше  та найменше із чисел:  s1= 2(a*b)/(a+b) – це середнє гармонійне ; s2= (a*b)^0,5- це середнє геометричне;  s3= (а + b)/2 – це середнє арифметичне; s4=(0,5a² +0,5b²)^0,5 - це середнє квадратичне.     

Завдання 12. Дано сторони трикутника – це три дійсні числа a, b, с, де 0<с=<b=<a.  Знайти:

1) можливість існування трикутника з даними сторонами, а саме перевірити одночасне виконання трьох умов:  a-b<c<a+b;   a-c<b<a+c; b-c<a<b+c;

2) вид трикутника за сторонами, тобто, рівносторонній(a=b=c), рівнобедрений(a=b or c=b or c=a), різносторонній (0<с<b<a).

3) вид трикутника за кутами тобто,  прямокутний(якщо a²+b²=c²), тупокутний( якщо a²+b²<c²), гострокутний( якщо a²+b²>c²).