Карта №1
ТЕМА: Составление, набор и отладка простейших программ на языке TP.
ЦЕЛИ: 1. Научиться составлять и отлаживать простейшие программы на языке использовать встроенные процедуры ТР 7.0 для имитации движения
графических объектов на экране компьютера.
2. Составить программы с использованием графических процедур.
ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ:
Простая программа состоит из блока описания переменных величин (Var), указания начала программы (Begin - начало), операторов ввода-вывода (Read, ReadLn – читай, Write, WriteLn – пиши), и для завершения в конце программы ставится End с точкой.
ЗАДАЧИ ДЛЯ ПРОГРАММИРОВАНИЯ:
Задание 1. Определите без компьютера и изобразите в тетради (один символ – одна клетка), что напечатает программа:
Uses WinCrt;
Begin
Write (2004);
WriteLn (‘ Мы начинаем!’);
WriteLn (‘6*8=’,6*8);
WriteLn;
WriteLn (‘Шестью шесть ’, 6*6, ‘Арифметика’, (6+4)*3);
End.
- Выполнив задание на бумаге, выполните программу на компьютере и сверьте результаты. Набрав программу, запустите ее (Ctrl+F9). Если число пробелов не совпадает, проанализируете программу и полученный результат на компьютере и исправьте ошибки в тетради.
- Добавьте рядом с пустым WriteLn еще один. Что изменилось? Почему?
Задание 2. Население Москвы равняется а=32 000 жителей. Население Нью-Васюков равняется b=1 000 жителей. Допишите программу, которая определяет разницу в числе жителей между этими двумя городами. Используйте переменные величины.
Uses WinCrt;
Var
a: integer;
b: integer;
Begin
Write (‘Введите число жителей Москвы ‘); ReadLn(a);
? ? ?
WriteLn (‘Разница между городами составляет‘,a-b,’жителей‘);
End.
- Набрав программу, запустите ее (Ctrl+F9).
- Измените число пробелов в разных местах последнего WriteLn так, чтобы текст был более читаемым.
Задание 3. Известны размеры спичечной коробки: высота – 12,41см, ширина – 8см, толщина – 5см. Напишите программу вычисления площади основания коробки и ее объем.
Формулы для вычисления: площадь=ширина * толщина, объем= площадь * высота.
Задание 4. Автомобиль 3ч. ехал со скоростью80км/ч и 2ч. со скоростью 90км/ч. Напишите программу вычисления средней скорости автомобиля. Используйте переменные величины и оператор присваивания.
Задание 5. Напишите программу, которая осуществляла бы такой диалог человека с компьютером:
Компьютер выводит на экран:
Здравствуйте, я компьютер, а тебя как зовут?
Человек вводит с клавиатуры:
Коля
Компьютер выводит на экран:
Очень приятно, Коля. Сколько тебе лет?
Человек вводит с клавиатуры:
16
Компьютер выводит на экран:
Ого! Целых 16 лет! Ты уже совсем взрослый!
Программа:
Uses WinCrt;
Var
name: string;
vozrast: integer;
Begin
? ? ?
? ? ?
? ? ?
? ? ?
End.
- Набрав программу, запустите (Ctrl+F9) и проверьте ее.
- Посмотрите как работает программа с другими именами и возрастами. В чем недостаток программы?
Дополнительное задание 1. Радиус окружности равен 800. Напишите программу вычисления длины окружности и площади круга.
Формулы для вычисления: длина окружности = 2pR, площадь=pR2.
Где число «пи» =3,1415 и в Паскале обозначается как Pi.
Дополнительное задание 2. Напишите программу, при которой в компьютер вводятся пусть, пройденный телом, и скорость тела. Необходимо найти время движения тела.
ОТЧЁТ:
Отчет состоит из:
- Программ, выполненных на языке программирования Turbo Pascal. Программы должны работать и выводить результат на экран.
- Пояснений к программам (если они необходимы), например алгоритмической структуры программы, математических или физических формул используемых при решении т.д.
- Ответов на контрольные вопросы к лабораторной работе.
Карта №2
ТЕМА: Составление и отладка программ с математическими вычислениями.
ЦЕЛИ: 1. Овладеть практическими навыками разработки и программирования вычислительного
процесса линейной структуры и навыками по отладке и тестированию программ.
2. Освоить работу с математическими вычислениями и функциями в Паскаль.
3. Составить программы с использованием встроенных математических функций.
ЗАДАНИЕ ДЛЯ САМОСТОЯТЕЛЬНОЙ ПОДГОТОВКИ:
- Изучить:
- запись констант, переменных, стандартных функций;
- правило записи арифметических выражений;
- арифметический оператор присваивания;
- организацию простейшего ввода-вывода данных.
- Разработать алгоритм решения в соответствии с заданием.
- Составить программу решения задачи.
- Подготовить тестовый вариант исходных данных и вычислить значения вычисляемых в программе величин.
МЕТОДИЧЕСКИЕ УКАЗАНИЯ:
Программы линейной структуры не содержат никаких условий и выполняются в той последовательности как записаны в них операторы. Для написания программы линейной структуры требуются операторы ввода информации, присваивания и вывода результатов вычислений.
В задании на выполнение лабораторной работы предусматривается значение функции Y(X), определенной совокупностью математический выражений в соответствии с заданными ограничениями на изменение значений аргумента X.
(Полный материал карты в архиве)
Карта №3
ТЕМА: Составление и отладка программ с условными операторами.
ЦЕЛИ: 1. Научиться использовать условный оператор If…then…else… и оператор выбора
Case…of…else… в ходе составления программ.
2. Составить программы с использованием этих операторов.
ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ:
- Инструкция if используется для выбора одного из двух направлений дальнейшего хода программы, а инструкция case используется для выбора одного из нескольких направлений дальнейшего хода программы;
-
Синтаксисы этих операторов таковы:
- If <условие> then <истинные инструкции> else <ложные инструкции>;
- Case <выражение> of
<диапазон значений_1> : <инструкции_1>;
<диапазон значений_2> : <инструкции_2>;
…
<диапазон значений_N> : <инструкции_N>;
Else <ложные инструкции>; End;
ЗАДАЧИ ДЛЯ ПРОГРАММИРОВАНИЯ:
Пр. 1 Напишите программу для вычисления корней квадратного уравнения.
Задание:
- Запустите программу Turbo Pascal.
- Наберите программу для вычисления корней квадратного уравнения:
Начало программы:
Program Lab_1_1;
Var
a, b, c : Integer;
x, x1, x2, D : Real;
Begin
Ввод исходных данных
Вычисления дискриминанта: D = b2-4ac
If D>0 then
begin
Writeln(‘D>0 уравнение имеет 2 корня’);
x1:= (-b+Sqrt(D))/(2*a);
x1:= (-b-Sqrt(D))/(2*a);
Writeln(‘x1=’,x1:0:2,’x2’,x2:0:2);
End;
If D=0 then
…
If D<0 then
…
End.
- Доработайте программу и запустите ее на выполнение (ctrl+F9).
- ВНИМАНИЕ! Если при запуске в тексте программы выделяется строка, это значит, что в этой или предыдущей строке допущена ошибка. Исправьте ее и запустите программу снова.
Пр. 2 Напишите программу для вычисления частного от деления 2-х чисел.
Задание:
- Откройте новый (чистый) документ Паскаль (File ® New).
- Наберите программу и запустите программу на выполнение (ctrl+F9).
- Программа должна проверять правильность введенных пользователем данных (делитель не должен быть равен 0) и выводить сообщение об ошибке.
Пр. 3 Напишите программу для вычисления площади кольца (см рисунок).
Задание:
- Откройте новый (чистый) документ Паскаль (File ® New).
- Наберите программу и запустите программу на выполнение (ctrl+F9).
- Программа должна проверять правильность введенных пользователем данных (радиус отверстия Rо не может быть больше радиуса кольца Rк) и выводить сообщение об ошибке.
- Используйте формулу: Площадь кольца = площадь круга – площадь отверстия.
Пр. 4 Напишите программу для вычисления сопротивления электрической цепи, состоящей из двух сопротивлений. Сопротивления могут быть соединены последовательно или параллельно.
Задание:
- Откройте новый (чистый) документ Паскаль (File ® New).
- Наберите программу и запустите программу на выполнение (ctrl+F9).
- Ниже представлен рекомендуемый вид экрана во время работы программы:
Вычисление сопротивления электрической цепи.
Введите исходные данные:
Величина первого сопротивления (Ом) —> 15
Величина второго сопротивления (Ом)—> 27.3
Тип соединения (1 - последовательное, 2 - параллельное) —> 2
Сопротивление цепи: 9.68 Ом.
Пр. 5 Напишите программу для вычисления стоимости покупки с учетом скидки. Скидка в 10% предоставляется, если сумма покупки больше 1000 руб.
Задание:
- Откройте новый (чистый) документ Паскаль (File ® New).
- Наберите программу и запустите программу на выполнение (ctrl+F9).
- Ниже представлен рекомендуемый вид экрана во время работы программы:
Вычисление стоимости покупки с учетом скидки.
Введите сумму покупки и нажмите
-> 1200
Вам предоставляется скидка 10%
Сумма покупки с учетом скидки: 1080.00 руб.
Пр. 6 Напишите программу, которая сравнивает два числа, введенных с клавиатуры. Программа должна указать, какое число больше, или, если числа равны, вывести соответствующее сообщение.
Задание:
- Откройте новый (чистый) документ Паскаль (File ® New).
- Наберите программу и запустите программу на выполнение (ctrl+F9).
- Ниже представлен рекомендуемый вид экрана во время работы программы:
Введите в одной строке два целых числа
34 67
34 меньше 67.
Пр. 7 Напишите программу которая, выводит пример на умножение двух однозначных чисел, запрашивает ответ пользователя, проверяет его и выводит сообщение "Правильно!" или "Вы ошиблись" и правильный результат.
Задание:
- Откройте новый (чистый) документ Паскаль (File ® New).
- Наберите программу и запустите программу на выполнение (ctrl+F9).
- Ниже представлен рекомендуемый вид экрана во время работы программы:
Сколько будет 6x7?
56
Вы ошиблись. 6x7=42.
ОТЧЁТ:
Отчет состоит из:
- Программ, выполненных на языке программирования Turbo Pascal. Программы должны работать и выводить результат на экран.
- Пояснений к программам (если они необходимы), например алгоритмической структуры программы, математических или физических формул используемых при решении т.д.
- Ответов на контрольные вопросы к лабораторной работе.
КОНТРОЛЬНЫЕ ВОПРОСЫ:
- Как организовать ветвление в программе?
- Опишите синтаксис условного оператора и оператора выбора.
- Чем отличается сокращенная форма условного оператора от полной?
Карта №4
ТЕМА: Программы с циклическими конструкциями в Turbo Pascal.
Карта № 5
ТЕМА: Построение двумерных динамических изображений средствами TP.
весь остальной материал находится в архиве.