Лабораторна робота №5. Тема: Написання програм використовуючі математичні функції. Освоєння арифметичних операторів. Описати кожний рядок програми від руки.
Завдання 1 Виконати програму за заразком. Внести зміни чисел (8,2) і виконати повторно.
Приклад: |
|
PROGRAM LOG; |
Программа логарифму; |
var Q: real; |
Зарезервоване слово що позначає змінну Q: Речовий тип даних - ідентифікатор змінної описує тип real; |
begin |
Зарезервоване слово що означає початок |
write('Введіть Q: '); readln(Q); |
написання символа ('Введіть Q: '); введення(Q); |
writeln('Логарифм Q :', ln(Q) :8:2) |
виведення символа('Логарифм Q :', ln(Q) :8:2) |
end. |
Зарезервоване слово, що закінчує цикл програми. |
Завдання 2. Змінивши попередню програму знайти функцію Sqrt, що повертає квадратний корінь аргументу 45+№ студента за списком.
Завдання 3.Значення програми потрібно змінити щоб знайти значення синуса 45+№ студента за списком.
Завдання 4. Ознайомитися з прикладом, написати ці приклади в програмі за зразком і підтвердити результат програми:
Program PR1;
Var x,y,z:Real;
Begin
x:=1.26;
y:=sqrt(1+sqr(sin(1+sqrt(x))));
z:=sin((2*x+5)/sqr(x-2))/cos((2*x+5)/sqr(x-2));
WriteLn ('Y=',y:7:2);
WriteLn ('Z=',z:7:2);
End.
Результати роботи програми: Y= 1.31 Z= 2.34
Завдання 5. Обчислити значення виразів:
Завдання 6. Записати на мові Паскаль дані приклади.
Наведемо приклади запису арифметичних виразів.
Математичний запис
Завдання 7. Скласти програму для обчислення площі прямокутника із сторонами а = 2, b = 3. Перед розв'язуванням будь-якої задачі треба зробити малюнок до задачі, скорочено записати умову, записати потрібні формули.
Program PR1; {Це заголовок програми}
Var a,b,S: Integer; {Це розділ опису змінних програми. Integer означає, що a,b,S - цілі числа}
{Початок розділу операторів}
Begin a:=2; {Надання значень змінним}
b:= 3; S:=a*b;
Write('S=',S) {Вивід результатів на екран}
End. {Кінець програми}Результати роботи програми: S=6
Додавши до числових значень № студента за списком, обрахувати її ще раз.
Самостійно змінивши параметри програми обчислити загальну площу всіх вікон кімнати. Розміри вікна 1,2+№ студента за списком х 1,6+№ студента за списком м.
Завдання 8.Скласти програму для обчислення площі круга та довжини кола.
!!!!!Знайти помилки виводу двух значень (див. обчислення логарифму)!!!!!
Program Pr2;
Const Pi=3.14;
Var S,R,L:Real;
Begin
R:=4.23;
S:=Pi*R*R;
L:=2*Pi*R;
WriteLn('S=',S:5:2);
WriteLn('L=',L:5:2);
End.
Результати роботи програми: S = 56.18 L = 26.56
Завдання 9. Самостійно визначити скільки секунд має доба. Потрібно внести зміни до попередньої програми.
Завдання 10. Ознайомитись з прикладами запису математичних виразів і виконати їх за зразком.
