Міністерство освіти та науки України Національний університет «Львівська політехніка» Інститут комп’ютерних наук та інформаційних технологій Кафедра ПЗ З В І Т Лабораторна робота № 3 з курсу «Основи програмування та алгоритмічні мови» Тема: «Обчислення виразів. Використання стандартних функцій» Варіант 6 Львів-2006 Мета роботи: вивчити порядок дій при обчисленні виразів; отримати навики запису виразів на мові Паскаль і використовувати стандартні функції Завдання: 1. Знайти значення функції
при заданому
. Використовуючи стандартні функції, обчислити цілу частину числа та заокруглити його до ближчого цілого. 2. Записати вираз, що залежить від координат точки
і
і приймає значення TRUE, якщо точка належить заштрихованій області, і FALSE, якщо не належить. Для заданої точки обчислити цей вираз і результати вивести на екран. Постановка задачі: Варіант 6. а)
при x=4.352 б) координати досліджуваної точки (0.5;-2.5) в) область зображена на рис.6. Блок-схема алгоритму
 Текст програми {Laboratorna robota 3 Variant 6} Program Lab3; uses crt; var y,y11,x1,y22,y1:real; b:boolean; const r=1; x=4.352; Begin clrscr; writeln ('Zavdannja 1'); y:=1+1/x+1/sqr(x); writeln ('y=',y); y11:=trunc(y); writeln ('y11=',y11:0:0); y22:=trunc(y+0.5); writeln ('y22=',y22:1:1); writeln ('------------------------------------------'); writeln ('Zavdannja 2'); writeln ('Vvedit koordunatu tochku'); write ('x1='); read (x1); write ('y1='); read (y1); b:=(x1<0) and (sqr(x1)+sqr(y1)<=sqr(r)); writeln(b); end. Протокол роботи програми ----------------------------------------------------------------------------------------------- Введіть коодинати точки Х1=2 У1=3 false ----------------------------------------------------------------------------------------------- Введіть коодинати точки X1=-0,3 У1=-0.2 true ----------------------------------------------------------------------------------------------- Введіть коодинати точки Х1=1 У1=1 false ----------------------------------------------------------------------------------------------- Висновок: На даній лабораторній роботі я вивчив порядок дій при обчисленні виразів; отримав навики запису виразів на мові Паскаль і використовувати стандартні функції