Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
Обчислення виразів. Використання стандартних функцій
Інформація про навчальний заклад
ВУЗ:
Національний університет Львівська політехніка
Інститут:
Не вказано
Факультет:
КН
Кафедра:
Не вказано
Інформація про роботу
Рік:
2005
Тип роботи:
Лабораторна робота
Предмет:
Інформаційні технології
Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти і науки України
Національний університет „Львівська політехніка”
Інститут комп’ютерних наук та інформаційних технологій
Кафедра ПЗ
ЗВІТ
Лабораторна робота №3
Тема: ” Обчислення виразів. Використання стандартних функцій ”
Львів - 2005
Мета роботи:
1. Вивчення порядку дій при обчисленні виразів.
2. Одержання навиків запису виразів на мові Паскаль і використання стандартних функцій.
Завдання:
1. Знайти значення функції при заданому . Використовуючи стандартні функції, обчислити , де означають цілу частину числа; .
2. Записати вираз, що залежить від координат точки і і приймає значення TRUE, якщо точка належить заштрихованій області, і FALSE, якщо не належить. Для заданої точки обчислити цей вираз і результати вивести на друк (екран).
----------------------------------------------------------------------------------------------------------
Знаходження значення функції
при x=4.352
Блок-схема алгоритму
Текст програми
program laba3;
uses crt;
var x,y,x1,y1,y11,y22:real;
umova:boolean;
begin
clrscr;
writeln;
writeln('************ Блок 1 ************');
writeln(' Введіть координати точки x');
write(' x= '); readln(x);
y:=1+1/x+1/sqr(x);
y11:=trunc(y);
y22:=trunc(y+0.5);
writeln(' y= ',y:5:3);
writeln(' [y]= ',y11:5:3);
writeln(' [y+0.5]= ',y22:5:3);
writeln;
writeln('************ Блок 2 ************');
writeln(' Введіть значення x1,y1');
write(' x1= '); readln(x1);
write(' y1= '); readln(y1);
umova:=(x1<=0) and (y<=0) and (sqr(x1)+sqr(y1)<=1);
writeln(umova);
writeln('************ Для виходу натисніть [ENTER] ************');
readln;
end.
Протокол роботи програми
-----------------------------------------------------------------------------------------------
x=4,352
Результат:
y=1,283
[y]=1,000
[y+0.5]=1,000
-----------------------------------------------------------------------------------------------
X1=0,5
Y1=-0,2
Результат:
FALSE
Висновок: На даній лабораторній роботі я вивчив порядок дій при обчислюванні виразів, та одержав навики запису виразів на мові Паскаль і використання стандартних функцій.
09.02.2013 01:02-
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора