Міністерство освіти і науки України
Полтавський національний технічний університет
імені Юрія Кондратюка
Кафедра автоматики та електропривода
Методичні вказівки
до виконання лабораторних робіт
із дисципліни: “Інформатика”
тема: “Turbo Pascal”
для студентів усих форм навчання
Найменування галузі знань 0505 Машинобудування та металообробка
Напрям підготовки 6.050503 Машинобудування
Викладач: Ясько Г.Г.
Полтава-2012
Лабораторна робота № 1
Мовою TURBO PASCAL скласти програму обчислення функції з розгалуженням F(Хi) згідно з варіантами завдань із використанням циклів REPEAT... UNTIL або WHILE... DO. Аргумент хi заданий умовами: , , h – крок, тобто величина, на яку збільшується змінна xі при черговому виконанні циклу, сталі: При використанні циклу FOR…TO (DOWNTO)...DO кількість повторень n=15.
Задача складається з двох частин. Спочатку вибираємо частину "А" задачі за останньою цифрою заліковки. Другу частину "Б" задачі вибираємо за передостанньою цифрою заліковки:
Наприклад, для варіанта "00" Умова задачі така:
Використати цикл REPEAT... UNTIL
Варіанти завдань
Остання цифра заліковки |
А |
Передостання цифра заліковки |
Б |
|
використати цикл |
||||
0 |
REPEAT... UNTIL |
|
0 |
|
1 |
FOR…TO...DO |
|
1 |
|
2 |
WHILE... DO |
|
2 |
|
3 |
REPEAT... UNTIL |
|
3 |
|
4 |
FOR…DOWNTO...DO |
|
4 |
|
5 |
WHILE... DO |
|
5 |
|
6 |
REPEAT... UNTIL |
|
6 |
|
7 |
FOR…TO...DO |
|
7 |
|
8 |
WHILE... DO |
|
8 |
|
9 |
FOR…DOWNTO...DO |
|
9 |
|
Лабораторна робота № 2
Скласти програму мовою TURBO PASCAL для розв'язування задачі.
Задача складається з двох частин. Спочатку вибираємо частину "А" задачі за останньою цифрою заліковки. Другу частину "Б" задачі вибираємо за передостанньою цифрою заліковки:
Програма має зчитувати з клавіатури в масив "частинаА", після чого повинна видати на екран "частина Б".
Наприклад, для варіанта "00" умова задачі така:
Програма має зчитувати з клавіатури в масив дійсні числа до тих пір, поки добуток чисел послідовності менше ніж 100, після чого повинна видати на екран список простих уведених чисел
Остання цифра заліковки |
А |
0 |
дійсні числа до тих пір, поки добуток введенихчисел менше ніж 100 |
1 |
цілі числа до тих пір, поки введене число не стане більше за попереднє |
2 |
дійсні числа до тих пір, поки сума додатних чисел менша за модуль суми від’ємних чисел |
3 |
дійсні числа до тих пір, поки не буде введено одиницю |
4 |
цілі числа до тих пір, поки сума парних чисел, що введені, більша за суму непарних чисел |
5 |
цілі числа до тих пір, поки не буде введене просте число |
6 |
цілі числа до тих пір, поки введене число більше за попереднє |
7 |
цілі числа до тих пір, поки сума введених чисел, які кратні п’яти, не перевищить 100 |
8 |
дійсні числа до тих пір, поки не буде введене число, яке попадає у діапазон між першим і другим уведеними числами |
9 |
цілі числа до тих пір, поки не буде введене число, кратне п’яти |
Перед остання цифра заліковки |
Б |
0 |
список простих уведених чисел |
1 |
максимальне за модулем число, а також список чисел, розташованих у межах від нуля до середнього |
2 |
суму парних та непарних чисел послідовності, що введена та максимальне за модулем від’ємне число |
3 |
модуль добутку додатних чисел та максимальне і мінімальне число послідовності |
4 |
мінімальне та максимальне число послідовності, що введена, та кількість від’ємних чисел |
5 |
кількість чисел, кратних п'яти, і найбільше із них |
6 |
мінімальне число, та середнє додатних чисел |
7 |
числа, які попадають у діапазон між першим і другим уведеним числом, та їх суму |
8 |
введену послідовність, середньоарифметичне послідовності та сформувати і видати на єкран новий масив за принципом: якщо елемент масиву - парне число, то записувати 0, якщо непарне - 1 |
9 |
введену послідовність, максимальний і найближчий до нього елемент |