Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
LR1-3.doc
Скачиваний:
3
Добавлен:
01.07.2025
Размер:
499.71 Кб
Скачать

Текст программы

Program zadacha2_2;

Var

x,y: real;

begin

witeln(‘введите координаты точки x и y через пробел’);

readln(x, y);

if (y>=0) and (x+y<=1) and (y-x<=1)

then

writeln(‘Точка принадлежит области’)

else

writeln(‘Точка не принадлежит области’);

end.

Дальнейшие действия:

  • Откомпилировать программу (клавиша <F9>), исправить ошибки, допущенные при наборе.

  • Запустить программу на исполнение (сочетание клавиш <Ctrl>+<F9>).

  • Задать тестовые значения переменных. Посмотреть результат выполнения программы, нажав сочетание клавиш <Alt>+<F5>, оценить полученный результат.

  • Запустить программу повторно, задать произвольные значения переменных, записать полученные результаты.

Вариант 1

Для заданного x вычислить значение функции

Вариант 2

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 3

Для заданного x вычислить значение функции

Вариант 4

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 5

Для заданного x вычислить значение функции

Вариант 6

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 7

Для заданного x вычислить значение функции

Вариант 8

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 9

Для заданного x вычислить значение функции

Вариант 10

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 11

Для заданного x вычислить значение функции

Вариант 12

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 13

Для заданного x вычислить значение функции

Вариант 14

Вычислить значение выражения, не используя стандартную функцию Abs().

Вариант 15

Для заданного x вычислить значение функции

Задание 3

Задание: составить программу решения задачи, используя оператор выбора.

Указания к выполнению: пункты 1-5 смотри задание 2.

Образец выполнения задания

Задача: написать программу, которая по номеру месяца выводит название сезона.

  1. Для решения задачи мне потребуется переменная, обозначающая номер месяца. Пусть эта переменная называется n.

  2. Входными данными в этой задаче является переменная n. Её значение должно быть введено до начала вычислений. Ввод переменной буду осуществлять с клавиатуры. Номер месяца может принимать значения от 1 до 12, поэтому тип переменной можно описать как диапазон 1..12, или как byte.

  3. В результате выполнения программы на экран должно быть выведено одно из сообщений «Зима», «Весна», «Лето», «Осень» или «Месяца с таким номером нет». Переменную для хранения сообщения вводить не буду. Сообщения буду выводить с помощью процедуры writeln().

  4. Ход решения задачи:

  • ввод переменной n;

  • выбор одного из вариантов:

если n=1 или n=2 или n=12, то вывести на экран сообщение «Зима»

если n=3 или n=4 или n=5, то вывести на экран сообщение «Весна»

если n=6 или n=7 или n=8, то вывести на экран сообщение «Лето»

если n=9 или n=10 или n=11, то вывести на экран сообщение «Осень»

если не выполняется ни один из вариантов, то вывести на экран сообщение «Месяца с таким номером нет»

  1. Тест для данной задачи придумайте самостоятельно и проверьте правильность решения задачи.

Текст программы

Program zadacha2_3;

Var n: byte;

Begin

Writeln(‘Введите номер месяца’);

Readln (n);

Case n of

1, 2, 12: writeln(‘Зима’);

3, 4, 5: writeln(‘Весна’);

6, 7, 8: writeln(‘Лето’);

9, 10, 11: writeln(‘Осень’);

else writeln(‘Месяца с таким номером нет’)

end;

end.

Дальнейшие действия: смотри задание 2.

Вариант 1

По заданному возрасту человека (n целое число) вывести сообщение каков возраст, добавляя к n слова «лет», «год» или «года». Например, 25 лет, 4 года, 51 год.

Вариант 2

Составить программу случайного выбора места летнего отдыха из семи предлагаемых туристическим агентством курортов, причем с вероятностью 3/10 придется отдыхать на даче.

Вариант 3

Составить программу, которая случайным образом выбирает один из трех вариантов: вычисление длины окружности и площади круга по заданному радиусу; вычисление периметра и площади треугольника по трем сторонам; вычисление периметра и площади параллелограмма по двум сторонам и углу между ними.

Вариант 4

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

Вариант 5

Дано натуральное число N (1N99), обозначающее количество копеек. Вывести на экран его значение в словесной форме. Например, N=35. Должно быть выведено «тридцать пять копеек». Следует учесть, что в данной фразе слова «копеек» может меняться на «копейка» или «копейки».

Вариант 6

В классе учится N учеников (20N40). Вывести на экран количество учеников в классе в словесной форме, в виде « в классе учится N(словами) учеников», следует учесть, что слово «учеников» может меняться на «ученик» или «ученика». Например, N=23, должно быть выведено «в классе двадцать три ученика».

Вариант 7

Составить программу случайного выбора дежурного из списка, в котором 4 мальчика и 4 девочки, причем для девочек вероятность выбора в два раза ниже, чем для мальчиков.

Вариант 8

Задано количество долларов (целое число), предназначенных для обмена, и курс обмена в рублях (целое число). Вывести на экран сумму, полученную в результате обмена, в рублях, добавляя в конце «рублей», «рубля» или «рубль». Например, 234 рубля, 541 рубль.

Вариант 9

Из списка видеофильмов, в котором 2 триллера, 2 боевика, 2 мелодрамы и 2 комедии случайным образом выбрать «самый популярный фильм», причем вероятность того, что это будет триллер или боевик в 2 раза выше, чем для любого другого фильма.

Вариант 10

Дана сумма денег в рублях (целое число), известен курс обмена рублей на доллары (целое число). Вывести на экран, сколько долларов можно приобрести на данную сумму, дописывая в конце слово «долларов», «доллара» или «доллар». Например, 10 долларов, 74 доллара и т.п.

Вариант 11

Для любого трехзначного числа вывести на экран его значение в словесной форме. Например, N=204, должно быть напечатано «двести четыре»

Вариант 12

Из четырех предметов, по двум из которых нужно сдавать зачет, предлагается составить список по два предмета в каждом варианте. Случайным образом выбрать из предложенного списка один из вариантов.

Вариант 13

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

Вариант 14

В книжном магазине продаются книги следующих жанров: фантастика, роман, детектив, классика, поэзия, учебная литература. Составить программу, которая случайным образом выбирает из списка жанр покупаемой книги, если известно, что классику и поэзию покупают в два раза реже, чем любую другую книгу.

Вариант15

Для осуществления платежа вводится сумма в рублях и копейках. Составить программу, которая записывает сумму прописью в следующем виде: ________________руб. kk коп.

(сумма прописью)

Например, вводится сумма платежа 134 руб. 45 коп, должно быть выведено «сто тридцать четыре руб. 45 коп».

Задание 4

Задание: составить программу решения задачи.

Указание к выполнению: выполнить все требования к лабораторной работе самостоятельно.

Вариант 1

Дано число x. Напечатать в порядке возрастания sinx, cosx, lnx. Если x таково, что логарифм не существует, то вывести об этом сообщение и сравнивать оставшиеся два значения.

Вариант 2

Два прямоугольника, расположенные в первом квадрате, со сторонами параллельными осям координат, заданы координатами своих левого верхнего и правого нижнего углов. Для первого прямоугольника это точки (x1, y1) и (x2, 0), для второго – (x3, y3) и (x4, 0). Определить, пересекаются ли данные прямоугольники, и вычислить площадь общей части.

Вариант 3

Дано действительное число x. Вычислить значение функции f в точке x, если функция f периодическая, с периодом 1.5, совпадающая на отрезке [0, 1.5] с функцией x2-2.25x.

Вариант 4

Выяснить, рубит ли шашка на поле (k,h) шашку на поле (m,n). Координаты полей задавать цифрами от 1 до 8, учитывать, что шашку, стоящую на краю доски, срубить нельзя.

Вариант 5

Даны координаты двух полей шахматной доски. Выяснить, можно ли одним ходом коня с поля (k, h) попасть на поле (m, n).

Вариант 6

Вводя координаты трех точек, выяснить, каким будет треугольник, построенный на этих точках, тупоугольный, остроугольный или прямоугольный.

Вариант 7

Выяснить, являются ли поля (k, h) и (m, n) на шахматной доске полями одного цвета.

Вариант 8

Считая, что стандартная функция sinx применима только к аргументам из отрезка [0, ], вычислить значение sinx для произвольного значения x.

Вариант 9

Даны числа a1, b1, c1 и a2, b2, c2. Напечатать координаты точки пересечения прямых a1x+ b1y= c1 и a2x + b2y = c2, либо сообщить, что эти прямые не пересекаются.

Вариант 10

Даны произвольные числа a, b, c. Выяснить, можно ли построить треугольник с такими сторонами, если можно, то какой.

Вариант 11

Даны координаты двух полей шахматной доски. Выяснить, можно ли с поля (k, h) ходом слона попасть на поле (m, n).

Вариант 12

Даны три стороны одного треугольника и три стороны другого треугольника. Выяснить, являются ли треугольники подобными.

Вариант 13

Считая, что стандартная функция cosx применима только к аргументам из отрезка [-/2, /2], вычислить значение cosx для произвольного значения x.

Вариант 14

Даны размеры дверного проема и шкафа. Выяснить, пройдет ли шкаф через дверной проем. Шкаф можно поворачивать, наклонять нельзя.

Вариант 15

Даны координаты двух полей шахматной доски. Выяснить, можно ли с поля (k, h) ходом ферзя попасть на поле (m, n).

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]