Лабораторно-практическое задание 3
[ Скачать с сервера (69.5 Kb) ]2019-04-08, 8:30 AM

(инструкционная карта для учащихся)

 

ТЕМА: Составление и отладка программ с условными операторами.

ЦЕЛИ: 1. Научиться использовать условный оператор If…then…else… и оператор выбора Case…of…else… в ходе составления программ.

2. Составить программы с использованием этих операторов.

 

ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ:

1. Инструкция if используется для выбора одного из двух направлений дальнейшего хода программы, а инструкция case используется для выбора одного из нескольких направлений дальнейшего хода программы;

2. Синтаксисы этих операторов таковы:

 If <условие> then <истинные инструкции> else <ложные инструкции>;

 Case <выражение> of

<диапазон значений_1> : <инструкции_1>;

<диапазон значений_2> : <инструкции_2>;

<диапазон значений_N> : <инструкции_N>;

Else <ложные инструкции>; End;

 

ЗАДАЧИ ДЛЯ ПРОГРАММИРОВАНИЯ:

Задание 1 Напишите программу для вычисления корней квадратного уравнения.

Задание:

1. Запустите программу Turbo Pascal.

2. Наберите программу для вычисления корней квадратного уравнения:

Начало программы:

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.

 

3. Доработайте программу и запустите ее на выполнение (ctrl+F9).

4. ВНИМАНИЕ! Если при запуске в тексте программы выделяется строка, это значит, что в этой или предыдущей строке допущена ошибка. Исправьте ее и запустите программу снова.

 

Задание 2 Напишите программу для вычисления частного от деления 2-х чисел.

Задание:

1. Откройте новый (чистый) документ Паскаль (File  New).

2. Наберите программу и запустите программу на выполнение (ctrl+F9).

3. Программа должна проверять правильность введенных пользователем данных (делитель не должен быть равен 0) и выводить сообщение об ошибке.

 

Задание 3 Напишите программу для вычисления площади кольца (см рисунок).

Задание:

1. Откройте новый (чистый) документ Паскаль (File  New).

2. Наберите программу и запустите программу на выполнение (ctrl+F9).

3. Программа должна проверять правильность введенных пользователем данных (радиус отверстия Rо не может быть больше радиуса кольца Rк) и выводить сообщение об ошибке.

4. Используйте формулу: Площадь кольца = площадь круга – площадь отверстия.

 

Задание 4 Напишите программу для вычисления сопротивления электрической цепи, состоящей из двух сопротивлений. Сопротивления могут быть соединены последовательно или параллельно.

Задание:

1. Откройте новый (чистый) документ Паскаль (File  New).

2. Наберите программу и запустите программу на выполнение (ctrl+F9).

3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Вычисление сопротивления электрической цепи.

Введите исходные данные:

Величина первого сопротивления (Ом) —> 15

Величина второго сопротивления (Ом)—> 27.3

Тип соединения (1 - последовательное, 2 - параллельное) —> 2

Сопротивление цепи: 9.68 Ом.

Задание 5. Напишите программу для вычисления стоимости покупки с учетом скидки. Скидка в 10% предоставляется, если сумма покупки больше 1000 руб.

Задание:

1. Откройте новый (чистый) документ Паскаль (File  New).

2. Наберите программу и запустите программу на выполнение (ctrl+F9).

3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Вычисление стоимости покупки с учетом скидки.

Введите сумму покупки и нажмите <Enter>

-> 1200

Вам предоставляется скидка 10%

Сумма покупки с учетом скидки: 1080.00 руб.

Задание 6. Напишите программу, которая сравнивает два числа, введенных с клавиатуры. Программа должна указать, какое число больше, или, если числа равны, вывести соответствующее сообщение.

Задание:

1. Откройте новый (чистый) документ Паскаль (File  New).

2. Наберите программу и запустите программу на выполнение (ctrl+F9).

3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Введите в одной строке два целых числа

34 67

34 меньше 67.

Задание 7 Напишите программу которая, выводит пример на умножение двух однозначных чисел, запрашивает ответ пользователя, проверяет его и выводит сообщение "Правильно!" или "Вы ошиблись" и правильный результат.

Задание:

1. Откройте новый (чистый) документ Паскаль (File  New).

2. Наберите программу и запустите программу на выполнение (ctrl+F9).

3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Сколько будет 6x7? 

56 

Вы ошиблись. 6x7=42.

 

ОТЧЁТ:

Отчет состоит из:

1. Программ, выполненных на языке программирования Turbo Pascal. Программы должны работать и выводить результат на экран.

2. Пояснений к программам (если они необходимы), например алгоритмической структуры программы, математических или физических формул используемых при решении т.д.

3. Ответов на контрольные вопросы к лабораторной работе.

 

КОНТРОЛЬНЫЕ ВОПРОСЫ:

1. Как организовать ветвление в программе?

2. Опишите синтаксис условного оператора и оператора выбора.

3. Чем отличается сокращенная форма условного оператора от полной?

Категория: Лабораторные работы | Добавил: shadrinuro
Просмотров: 292 | Загрузок: 3 | Рейтинг: 0.0/0
Всего комментариев: 0
avatar