Програмування на мові Turbo Pascal - 5завдань (звіт + програми)

Задача №1

Швидкість світла 299792 км/с. Яку відстань долає світло за годину, добу? Скласти і виконувати програму, задавши вхідні дані самостійно.


Задача №2

Трикутник задано координатами вершин А(0; 0), В(10; 9), С(-10; 11). Обчислити медіану mc та бісектрису Wa.



Задача №3а

Розгалуження. Ввести довільне значення х та обчислити значення функції:

Скласти дві програми, використовуючи:
1) повну команду розгалуження if;
2) коротку команду розгалуження if.
Вхідні дані (x, a, b, c, d) ввести з клавіатури довільні. Результати обчислень вивести на екран.



Задача №3б

Розгалуження. Нехай оплата залежить від типу виконаної роботи чи виду підприємницької діяльності (А, Б, В) і нараховується за формулою.

Для робіт типу А податок становить 10%, для Б – 15%, для В – 20%. Ввести тип робіт. Вивести нараховану суму, суми податку і суму до видачі. Розв’язати задачу трьома способами, використовуючи:
1) повну команду розгалуження if;
2) коротку команду розгалуження if;
3) команду вибору case.


Задача №4

Ввести першу букву назви міста. Вивести довідку про кількість населення і площу міста.


Задача №5

Цикли. Таблиця мір. Побудувати таблицю відповідностей між мірами. Початкове значення міри, крок зміни цього значення та кількість рядків у таблиці (10-15) задати самостійно у режимі діалогу.
1 страйк = 72,7 л = 1280,46 чарок.

1. Зуев Е. А. Программирование на языке Turbo Pascal 6.0, 7.0, М.:Веста,Радио и связь, 1993, — С. 376 .
2. Кассера В. Ф. Turbo Pascal 7.0, Диасофт, 2003.
3. Лукин С. Н. Turbo Pascal 7.0. Самоучитель для начинающих. Диалог-МИФИ 2002. – 384 с.
4. Моргун Александр Николаевич. Справочник по Turbo Pascal для студентов. — М.: Диалектика, 2006. — С. 608.
5. Нэйл Рубенкинг. Turbo Pascal для Windows = Turbo Pascal for Windows. Techniques and Utilites. — М.: Мир, 1993. — С. 535.
6. Фаронов В.В. Turbo Pascal 7.0 Начальный курс издания 7-е переработанное, издательство “Нолидж”, Москва 2001г. – 575 с.
7. Фаронов В. В. Turbo Pascal. Наиболее полное руководство. BHV-Санкт-Петербург, 2007.
8. Эллиот Б. Коффман. Turbo Pascal = Turbo Pascal Web Update. — М.: Вильямс, 2005. — С. 896.