Задания к работе 1 Тема: оператор присваивания
|
№1 Определить
площадь треугольника по формуле
|
|
№2 Вычислить
значение функции:
|
|
№3 Вычислить
значение функции:
|
|
№4 Вычислить
значение функции:
|
|
№5 Вычислить
значение функции:
|
|
№6 Найти сумму трех последовательных чисел. |
|
№7 Найти разность двух последовательных чисел. |
|
№8 Найти расстояние между автомобилями, если они едут из одного пункта в разные стороны со скоростями v1 и v2, время движения – t. |
|
№9 Найти произведение двух последовательных чисел. |
|
№10 Вычислить
значение функции:
|
|
№11 Найти
расстояние между двумя точками на
плоскости:
|
|
№12 Найти
координату середины отрезка:
где (x1,y1) и (x2,y2) координаты концов отрезка |
|
№13 Найти
расстояние между двумя точками в
пространстве:
Координата первой точки (x1,y1,z1), второй - (x2,y2,z2) |
|
№14 Вычислить
значение функции:
|
.
Координата первой точки (x1,y1),
второй - (x2,y2)
,
Тема: условный оператор Задание 1.
|
№1 Рассчитать
|
|
№2 Рассчитать
|
|
№3 Рассчитать
|
|
№4 Рассчитать
|
|
№5 Рассчитать
|
|
№6 Рассчитать
|
|
№7 Рассчитать
|
|
№8 Рассчитать
|
|
№9 Рассчитать
|
|
№10 Рассчитать
|
|
№11 Рассчитать
|
|
№12 Рассчитать
|
|
№13 Рассчитать
|
|
№14 Рассчитать
|
Задание 2.
Определить принадлежность точки с вещественными координатами (х,у) некоторой области, включая ее границы.
При вводе геометрических фигур, возможны случаи, при которых область пуста. Программа должна выдавать соответствующее сообщение и предлагать повторить ввод.
|
№1 Область определяется как пересечение двух окружностей, координаты центров и радиусы вводятся с клавиатуры. |
|
№ 2 Область определяется как объединение двух окружностей, координаты центров и радиусы вводятся с клавиатуры. |
|
№3 Область
определяется как:
|
|
№4
Область определяется
как:
|
|
№5
Область определяется
как:
|
|
№6
Область определяется
как:
|
|
№7
Область определяется
как:
|
|
№8
Область определяется
как:
|
|
№9
Область определяется
как:
|
|
№10
Область определяется
как:
|
|
№11 Область определяется как треугольник, координаты вершин которого вводятся с клавиатуры. |
|
№12 Область определяется как прямоугольник, координаты вершин которого вводятся с клавиатуры. |
|
№13 Область определяется как:
|
|
№14 Область определяется как:
|
Практическая работа 2. Циклы
Для реализации циклов в Паскаль имеются три оператора. Если число повторений заранее известно, то удобно воспользоваться оператором цикла с параметром. В других случаях следует использовать операторы цикла с предусловием (цикл «пока») или с постусловием (цикл «до»).
Цикл с предусловием
В цикле “пока“ управление внутри цикла осуществляется с помощью логического условия:
цикл пока < условие>
< действие >
кц
Выполнение действия повторяется до тех пор, пока верно условие. Проверка условия осуществляется в начале цикла. Это означает, что действие может не выполниться ни разу. Чтобы такой цикл не был бесконечным, внутри цикла необходимо предусмотреть изменение значения условия с истинного на ложное. Цикл с предусловием является наиболее мощным в Паскале. Другие операторы цикла можно выразить через него.
Структура цикла с предусловием:
while <логическое выражение> do <оператор>
Вычисляется значение логического выражения, если оно равно true, то выполняется оператор, после чего снова вычисляется значение логического выражения, в противном случае действие заканчивается.
Решим задачу: На склад привозят однородный груз на машинах разной грузоподъемности. На компьютер, управляющий работой склада, поступает информация о весе груза очередной машины. Составить программу подсчета количества машин, прибывших на склад до его заполнения, если вместимость склада не более 100 тонн.
Введем обозначения: s – сумма веса груза, хранящегося в этот момент на складе; n – число разгруженных машин; w – масса груза очередной машины. Вначале величины sum и num равны нулю. Цикл разгрузки продолжается, пока выполняется равенство s<100.
Алгоритм Цикл с предусловием
Начало
ввод (w )
пока sum<100 делать s:=s+w
если s<=100 то n:=n+1 (число машин растет)
иначе выход из цикла
все
вывод (n)
Конец
Программа 1.
program sklad;
var s,w:real;
n:integer;
begin
n:=0,sum:=0;
while s<100 do
begin
writeln(‘введите вес груза машины’);
readln(w);
s:=s+w;
if s<=100 then n:=n+1;
else writeln(‘груз уже не поместится’)
end;
writeln(‘число разгруженных машин =’,n:3)
end.
Цикл с постусловием
Тип структуры цикл “ до “ имеет вид:
цикл < действие >
до < условие>
Как только значение условия становится истинным, цикл прекращается. Цикл “до“ независимо от значения условия выполнится по меньшей мере один раз, т.к. проверка условия производится после выполнения действия. Для завершения цикла необходимо внутри цикла изменить условие с ложного на истинное. Выбор структуры цикла определяется особенностями алгоритма решения конкретной задачи.
Оператор цикла с постусловием имеет форму:
repeat <последовательность операторов>
until <логическое выражение>
Действие: выполняется последовательность операторов. Далее вычисляется значение логического выражения. Если оно равно true, то действие заканчивается, если – false, снова выполняется последовательность операторов и т.д.
Решим предыдущую задачу, применяя цикл с постусловием. Цикл разгрузки заканчивается, если выполняется условие: s>100.
Алгоритм Цикл с постусловием
Начало
ввод (w )
повторять s:=s+w до тех пор пока s>100 (пока склад не заполнится)
если s<=100 то n:=n+1 (число машин растет)
иначе выход из цикла
все
вывод (n)
Конец
Программа 2.
program sklad;
var s, w: real; n:integer;
begin
n:=0; s:=0;
repeat
writeln (‘введите вес груза машины’);
readln (w); s:=s+w;
if s<=100 then n:=n+1
else writeln (‘груз уже не поместится’)
until s>=100;
writeln (‘количество разгруженных машин =’,n:3)
end.
Цикл с параметром
Цикл “от до“ или цикл с параметром управляет повторением выполнения действия с помощью переменной цикла:
цикл от I := N1 до N2
< действие >
кц
Здесь I - переменная цикла, N1, N2 - начальное и конечное значения переменной цикла, вычисляются один раз при входе в цикл. Переменная цикла пробегает все следующие друг за другом в порядке возрастания значения от начального до конечного. Изменение значения переменной цикла происходит автоматически после каждого выполнения действия, указанного внутри цикла. В зависимости от соотношения N1 и N2 цикл может не выполниться ни разу (N1>N2) или выполниться ( N2-N1+1) раз.
Оператор цикла с параметром предусматривает повторное выполнение некоторого оператора с одновременным изменением по правилу арифметической прогрессии значения управляющей переменной (параметра) этого цикла. Оператор цикла с параметром имеет две формы.
Форма 1:
for <параметр>:= <> to <выражение 1> do <выражение 2>
Параметр, выражение 1, выражение 2 должны быть одного ординального типа. Параметр в этом цикле возрастает.
Форма 2:
for <параметр>:=<выражение 1> downto <выражение 2> do <оператор>
Пример. Найти сумму k членов гармонического ряда:
1+1/2+1/3+1/4+... + 1/k
Алгоритм Цикл_”от_до” (сумма гармонического ряда)
Начало
ввод (k)
S := 0
цикл от I := 1 до k
S := S + 1 / I
кц
вывод ( S )
Конец
В приведенном алгоритме целесообразно применить базовую структуру Цикл “от до“ для суммирования k членов гармонического ряда, поскольку число повторений в цикле заранее известно - k раз.