
- •Львівський кооперативний коледж економіки і права
- •Постановка Задачі
- •Теоретичний вступ
- •Оператори виведення даних на екран:
- •Оператори введення даних з клавіатури:
- •Оператор присвоювання:
- •Оператор розгалуження:
- •Цикл з лічильником:
- •Оператор циклу «До»:
- •Оператор вибору:
- •Опис програми
- •Опис логічної структури
- •Опис вхідних даних
- •Опис вихідних даних
- •Опис підпрограм
- •Опис алгоритму розвязку завдання
- •Тестові приклади
- •Опис виконання програмного коду
- •Висновок
- •Список використаної літератури
- •Додаток 1 програмний код rent.Pas
- •Додаток 2
Львівський кооперативний коледж економіки і права
Циклова комісія «Інформатики та розробки
програмного забезпечення»
Затверджено до захисту у комісії
Голова ЦК______________Варгас В.М.
РОЗРАХУНКОВО-ГРАФІЧНА РОБОТА
З дисципліни «Основи програмування та алгоритмічні мови»
на тему: «Оренда приміщень»
Виконав:студент групи ПК-20
Кручинський Олег
Керівник роботи:________________
ЛЬВІВ – 2012
Постановка Задачі
Створити масив записів приміщень,які хочуть здати в оренду (<21),де вказати адресу,площу,призначення приміщення,ціну за кв.м.Дані користувач вводить з клавіатури.Здійснити введення даних,пошук за площею,чи призначення орендованого приміщення.
Теоретичний вступ
Для більш зручної роботи , в програмі застосовано Лінійний пошук
Пошук потрібної площі здійснюється лінійним методом. Цей метод є найпростішим методом і на відміну, наприклад, від двійкового пошуку, не накладає жодних обмежень і має просту реалізацію. Пошук значення здійснюється порівнянням чергового розглянутого значення і, якщо значення збігаються то пошук вважається завершеним.
Вкладені оператори
Під час написання програмного коду, були застосовані вкладені оператори:
Оператори виведення даних на екран:
Write ("сп"); Writeln ("сп");
Тут "сп" - список змінних. Наприклад, оператори Write (a, b, c); або Write (a); Write (b); Write (c); або Writeln (a, b, c); - виводять значення змінних "a", "b", "c" починаючи з поточної позиції курсору. Після виведення даних оператором Write ("сп"); курсор залишається за останнім виведеним символом. Оператор Writeln ("сп"); після виведення даних переводить курсор на першу позицію наступного рядка. Наприклад, для виведення значень змінних "a", "b", "c" в трьох рядках екрану слід написати: Writeln (a);Writeln (b);Writeln (c); Оператор Writeln; переводить курсор на початок наступного рядка екрану. Оператор Write ('Моя перша програма!'); Виводить на екран вказаний текст. У операторах виведення допускається виробляти арифметичні дії, наприклад, оператор Writeln (32 * a + Sin (x)); відповідає операторам b: = 32 * a + Sin (x); Writeln (b); При виведенні даних можна задавати формат виводу. Для цього після імені змінної ставиться знак двокрапка ":", наприклад: Writeln (a: 5:2); - при виведенні значення змінної дійсного типу відводиться 5 позицій (включаючи негативний знак і крапку), з них 2 позиції відводиться для виведення цифр у дробової частини. При виведенні значення змінної цілого типу задається кількість позицій для числа (включаючи відємний знак), наприклад: Writeln (i: 8); При виведенні значень символьних і рядкових змінних формат визначає число позицій для виведення значення змінної (тексту). При виведенні число або текст вирівнюються по правому краю відведеного поля, наприклад: якщо а: = 5. 02;, то оператор Writeln ('а =', a: 6:2); виведе на екран: а = _ _ 5. 02, якщо n: = '116 '; s: =' Школа N ';, то оператор Writeln (s: 7, n: 6); виведе на екран напис: Школа N _ _ _ 116. Для вирівнювання числа або тексту по лівому краю відведеного поля перший знак формату задається відємним, наприклад: оператор Writeln ('а =', a: -8:2); виведе на екран напис: а = 5. 02 оператор Writeln (s: 7, n: -6); виведе на екран напис: Школа N116. При нестачі кількості позицій для виведення число або текст виводяться повністю, а формат ігнорується, окрім формату виводу дробової частини числа. Якщо формат виводу не ставити, то значення цілих і строкових змінних виводяться повністю, а речовинних - в експоненційної формі з кількістю цифр, що відповідають типу змінної, наприклад, оператор Writeln ('а =', a); виведе на екран напис: a = 5 . 0200000000E +00 (тип Real), або a = 5. 02000000000000E +0000 (тип Double).