Некоторые процедуры и функцииOdd(x) – Проверяет аргумент на чётность (true, если аргумент нечётный); Ord(x) – Возвращает код символа; Abs(x) – Модуль x; Chr(x) – Возвращает символ с кодом x; Sqr(x) – Квадрат числа x; Sqrt(x) – Квадратный корень числа x; Exp(x) – Экспонента в степени x; Sin(x) – Синус x; Cos(x) – Косинус x; Ln(x) – Натуральный логарифм от x; Arctan(x) – Арктангенс x; Trunc(x) – Отсечение дробной части; Round(x) – Округление числа x; Read (x1, x2, …, xn) – Считывание значений переменных с клавиатуры без перехода на следующую строку; ReadLn (x1, x2, …, xn) – Cсчитывание значений переменных с клавиатуры построчно; Write (x1, x2, …, xn) – Вывод значений переменных на экран без перехода на следующую строку; WriteLn (x1, x2, …, xn) – Вывод значений переменных на экран с последующим переходом на следующую строку. Выполнение работы: 1. Запустить среду программирования Turbo Pascal (C:\BP\BIN\Turbo.exe). 2. Набрать код программы. 3. Запустить программу командой Runà Run или сочетанием клавиш <Ctrl+F9>. 4. Сохранить код программы в файле.pas командой Fileà Save as. 5. Создать exe-файл программы (Compileà Destinationà Disk). Задания (1 раздел): 1. Создайте программу для вычисления площади прямоугольника по введенным в диалоге двум сторонам. 2. Создайте программу для вычисления длины окружности и площади круга по указанному радиусу. 3. Создайте программу для вычисления длин высот треугольника, у которого длины сторон равны А, В, С. 4. Создайте программу для вычисления длин медиан треугольника, у которого длины сторон равны А, В, С. 5. Создайте программу для вычисления работы, совершенной при равномерном подъеме груза массой m [кг] на высоту h [м]. Ускорение свободного падения опишите как константу g = 9,81. 6. Создайте программу для вычисления давления столба жидкости плотностью r высотой h на дно сосуда. 7. Создайте программу для вычисления давления на пол, создаваемого столом массой m, если суммарная площадь опоры его ножек равна 100 см2. 8. Создайте программу для вычисления выталкивающей силы, действующей на тело объемом V, наполовину погруженное в жидкость плотностью r. 9. Создайте программу для вычисления количества теплоты, полученного при сгорании m [г] керосина, если его теплота сгорания равна q. 10. Создайте программу для вычисления количества теплоты, затраченного на нагревание тела плотностью r, объемом V на t градусов Цельсия, если его удельная теплоемкость равна С. 11. Создайте программу для вычисления силы тока на участке электрической цепи сопротивлением R [Ом] при напряжении U [В]. 12. Создайте программу для вычисления напряжения на каждом из последовательно соединенных участков электрической цепи сопротивлением R1, R2, R3 [Ом], если сила тока при напряжении U [В] составляет I [А]. 13. Создайте программу для вычисления силы тока I на участке, состоящем из двух параллельно соединенных резисторов сопротивлением R1 и R2, если напряжение на концах этого участка равно U. 14. Создайте программу, определяющую плотность тела, объем которого равен V, а масса - m. 15. Создайте программу, определяющую количество теплоты Q, требуемое для нагревания V [л] жидкости температурой t1 до температуры кипения t2, если известна удельная теплоемкость жидкости q.
Задания (2 раздел): 1. Создайте программу, вычисляющую периметр и площадь треугольника по введенным в диалоге длинам трех сторон, откомпилируйте ее и проверьте ее работу. 2. Создайте программу, вычисляющую значение среднего арифметического трех натуральных чисел. 3. Создайте программу, вычисляющую по введенному значению радиуса длину окружности и ее площадь. Для вычисления значения числа π ≈ 3,141592... в Pascal используется стандартная функция с идентификатором PI. 4. Создайте программу, вычисляющую периметр квадрата по указанному значению его площади. 5. Создайте программу, вычисляющую скорость прямолинейного равномерного движения тела по указанным значениям перемещения и времени, в течение которого это перемещение совершено. 6. Создайте программу подсчета размера платы за электроэнергию по введенным значениям расхода электроэнергии и тарифа (тариф – стоимость 1 кВт/ч).
Задания (3 раздел): 1. Создайте программу, которая, используя процедуру WriteLn, изображает на экране домик: * * * * * *********** * * * * *********** 2. Создайте программу, которая выводит на экран компьютера заставку, аналогичную следующей: ********************************** * Программа * * вычисления суммы чисел * * Автор: _____________ * ********************************** 3. Напишите программу, которая вводит значения трёх переменных: А, В, С типа Word и выводит их сумму. Каждое значение следует выводить с отдельной строки. Результат также помещается на отдельную строку. При составлении программы обеспечьте приглашение к вводу данных. 4. Напишите программу, которая вводит значения четырех переменных, А, В, С, D, типа integer и выводит их сумму. Пару значений А и В следует вводить на одной строке, С и D - на другой. Результат следует вывести на отдельную строку и курсор оставить на той же строке. 5. Напишите программу, которая вводит значения двух переменных, А и В, типа integer с приглашениями к вводу каждой переменной и выводит их разность. Результат ввода и результат расчета требуется выводить на экран. Приглашение и ввод каждого значения следует произвести в отдельных строках. Вывод сопроводите пояснением. 6. Напишите программу ввода значений А, В, С в одной строке и выведите результат вычисления выражения А*(В/3,14) + (С*3) в отдельной строке. 7. Напишите программу ввода значений R, Y в одной строке и выведите результат вычисления выражения R*Y2+(Y/5) в той же строке. 8. Напишите программу вычисления площади прямоугольного треугольника значения катетов которого А и В вводятся с клавиатуры. Результат требуется вывести в следующем виде: «Для значений катетов 4 и 6 площадь прямоугольного треугольника равна 12». 9. Напишите программу вычисления идеального веса человека по формуле [Идеальный вес]=[Рост в см]-100. Значение роста вводится с клавиатуры. Результат требуется вывести в следующем виде: «Идеальный вес человека ростом 165 см равен 65 кг». 10. Напишите программу получения следующей формы: ************************************* * А * В * А+В * А-В * А/В * ************************************* 6 2 8 4 3.0 ************************************* 11. Вы положили деньги в банк на срочный депозит на три месяца из расчета 60 % годовых. Напишите программу, которая вычислит причитающуюся вам через три месяца сумму. 12. Розничная цена мужского костюма составляет Р [руб.]. Торговая скидка в пользу магазина составляет Т [%] от розничной цены. Создайте программу определения оптовой цены костюма. 13. Создайте программу расчета масс соли и воды, требующихся для приготовления раствора массой m [г] с массовой долей w [%]. 14. Создайте программу исследования положительного вещественного числа А, в которой определялись бы значения следующих величин: целая часть, дробная часть, значение арифметического квадратного корня, остаток от деления на 5. 15. Создайте программу, определяющую, сколько времени в минутах затратит школьник на дорогу от школы до стадиона, если известна длина этого расстояния s и средняя скорость движения школьника v [км/ч]? Значения s и v вводятся с клавиатуры. 16. Создайте программу, вычисляющую, сколько процентов от А+В-С приходится: 1) на А; 2) на В; 3) на С.
Контрольные вопросы: 1. Основные компоненты окна редактирования программ среды программирования Turbo Pascal и их назначение. 2. Как откомпилировать программу? 3. Как посмотреть результаты выполнения программы в окне пользователя. 4. Дайте определение следующим понятиям: · Алфавит; · Зарезервированное слово; · Выражение; · Оператор; · Идентификатор; · Константы; · Переменные. 5. Как будет выглядеть структура простейшей программы в Turbo Pascal. Содержание отчёта: 1. Номер, тема, цель работы. 2. Результаты работы в распечатанном виде. 3. Ответы на контрольные вопросы. 4. Вывод. Отчёт по лабораторной работе №17
Тема: Цель работы: Выполнение работы:
Ответы на контрольные вопросы: 1.
2.
3.
4.
5.
Вывод: Тест по теме «Основные элементы и типы данных Pascal»
|
