2020-06-29
143Лабораторная работа 17
Разработка программ линейной структуры
1. Цель работы: овладеть практическими навыками разработки программ линейной структуры в среде программирования Pascal ABC.
2. Теоретическое обоснование
ПРИМЕР: Вычислить сторону и периметр квадрата, если известна его площадь.
Блок-схема алгоритма: Программа на языке Pascal
| program Figura; uses Crt; var a, b, p, s: real; begin ClrScr; write ('S='); readln (s); a:= sqrt (s); {вычисление стороны} p:= 4* a; {вычисление периметра} writeln (' a = ', a:5:2, ' ед'); writeln (' p= ', p:5:2, ' ед'); readln; end. |
| начало |
| S |
|
| p = 4 * a |
| a, p |
| конец |
3. Алгоритм выполнения работы:
Ознакомиться с теорией вопроса
Выполнить представленные задания
Задание 1. Разработать алгоритм решения задачи на языке блок-схем и программу в среде программирования Pascal ABC.
Треугольник задан координатами 
своих вершин. Найти периметр и площадь треугольника.
Указание: Воспользуйтесь формулой для вычисления расстояния между двумя точками: 
и формулой Герона для вычисления площади треугольника: 
, где p — полупериметр.
|
|
|
Задание 2. Выполните представленные задания.
Пусть значения переменных x и y равны, соответственно, 0.3 и -0.2. Какие значения будут иметь эти переменные после выполнения операторов присваивания:
a) 
b) 
c) 
Какие из следующих последовательностей символов является операторами ввода:
a) read (x, y, z);
b) read x, y, z;
c) readln (x);
d) x:= read (x);
e) readln (a; b);
f) read (a, a + b)?
Какие из следующих последовательностей символов являются операторами вывода:
a) write (x, y);
b) writeln (x, x + 1, x + 2);
c) read (a);
d) write (100);
e) writeln (x; y; z);
f) write (x + 2.2);
g) write (x + 2,3)?
Задать в виде оператора присваивания следующие действия:
a) Переменной a присвоить значение, равное полусумме значений переменных x и y;
b) Удвоить значение переменной a;
c) Значение переменной x увеличить на 0.1;
d) Изменить знак значения переменной t.
Задание 3.
Начертить блок-схему алгоритма для вычисления функции согласно своему варианту (Приложение 1).
Составить программу для вычисления функции на компьютере. Выполнить компиляцию программы. Запустить программу с исходными данными. Результаты вычислений представить в отчете.
Вариант 1. Написать программу вычисления площади прямоугольника.
Вычисление площади прямоугольника
Введите исходные данные:
Длина (см) —> 9
Ширина (см) —> 7.5
Площадь прямоугольника: 67.50 кв.см.
Вариант 2. Написать программу вычисления объема параллелепипеда.(
)
Вычисление объема параллелепипеда
Введите исходные данные:
Длина (см) —> 9
Ширина (см) —> 7.5
Высота (см) —> 5
Объем: 337.50 куб.см.
|
|
|
Вариант 3. Написать программу вычисления площади поверхности параллелепипеда. (сложить площади всех граней)
Вычисление площади поверхности параллелепипеда.
Введите исходные данные:
Длина (см) —> 9
Ширина (см) —> 7.5
Высота (см) —> 5
Площадь поверхности: 300.00 кв.см.
Вариант 4. Написать программу вычисления объема куба.
Вычисление объема куба.
Введите длину ребра (см) и нажмите клавишу <Enter>
—> 9.5
Объем куба: 857.38 куб.см.
Вариант 5. Написать программу вычисления объема цилиндра. (
)
Вычисление объема цилиндра.
Введите исходные данные:
Радиус основания (см) —> 5
Высота цилиндра (см) —> 10
Объем цилиндра 1570.80 см.куб.
Для завершения нажмите <Enter>
Вариант 6. Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и карандашей.
Вычисление стоимости покупки.
Введите исходные данные:
Цена тетради (руб.) —> 2.75
Количество тетрадей —> 5
Цена карандаша (руб.) —> 0.85
Количество карандашей —> 2
Стоимость покупки: 15.45 руб.
Вариант 7. Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и такого же количества обложек к ним.
Вычисление стоимости покупки.
Введите исходные данные:
Цена тетради (руб.) —> 2.75
Цена обложки (руб.) —> 0.5
Количество комплектов (шт.) —> 7
Стоимость покупки: 22.75 руб.
Вариант 8. Написать программу вычисления стоимости некоторого количества (по весу) яблок.
Вычисление стоимости покупки.
Введите исходные данные:
Цена одного килограмма яблок (руб.) —> 8.5
Вес яблок (кг) —> 2.3
Стоимость покупки: 19.55 руб.
Вариант 9. Написатьпрограмму вычисления площади треугольника, если известна длина основания и высота.(
)
Вычисление площади треугольника.
Введите исходные данные:
Основание (см) —> 8.5
Высота (см) —> 10
Площадь треугольника 42.50 кв.см.
Вариант 10. Написать программу вычисления площади треугольника, если известны длины двух его сторон и величина угла между этими сторонами.(
)
Вычисление площади треугольника.
Введите (через пробел) длины двух сторон (см) треугольника
—> 25 17
Введите величину угла между сторонами треугольника
—> 30
Площадь треугольника: 106.25 кв.см.
Вариант 11. Написать программу, вычисления площади поверхности цилиндра. (
)
Вычисление площади поверхности цилиндра.
Введите исходные данные:
Радиус основания (см) —> 5.5
Высота цилиндра (см) —> 7
Площадь поверхности: 431.97 кв.см.
Вариант 12. Написать программу пересчета веса из фунтов в килограммы (1 фунт — 405,9 грамма).
Пересчет веса из фунтов в килограммы.
Введите вес в фунтах и нажмите <Enter>.
—> 3.5
3.5 фунт(а/ов) — это 1 кг 420 гр.
Вариант 13. Написать программу пересчета величины временного интервала, заданного в минутах, в величину, выраженную в часах и минутах.
Преобразование числа в денежный формат.
Введите дробное число —> 23.6
23.6 руб. — это 23 руб. 60 коп.
Вариант 14. Написать программу пересчета расстояния из верст в километры (1 верста — это 1066,8 м)
Пересчет расстояния из верст в километры.
Введите расстояние в верстах —> 100
100 верст — это 106.68 км
Вариант 15. Написать программу вычисления объема параллелепипеда ( ).
Вычисление объема параллелепипеда.
Введите в одной строке длину, ширину и высоту параллелепипеда (в сантиметрах)
Числа разделяйте пробелами.
После ввода последнего числа нажмите <Enter>.
—> 7.5 2.5 3
Объем параллелепипеда 56.25 см.куб.
Сделать вывод по работе
