Линейным называется алгоритм, в котором результат получается путем однократного выполнения заданной последовательности действий при любых значениях исходных данных. Операторы программы выполняются последовательно, один за другим, в соответствии с их расположением в программе.
Пример
Пример1: Определить расстояние на плоскости между двумя точками с заданными координатами M1(x1,y1) и M2(x2,y2)
Этапы решения задачи:
- Математическая модель: расстояние на плоскости между двумя точками M1(x1,y1) и M2(x2,y2) высчитывается по формуле
- Составим схему алгоритма
Уточним содержимое блокас "Вычисление и печать расстояния"
Дальнейшая детализация не требуется. Переводим блок-схему на язык Паскаль.
program example1;
var x1, x2, y1, y2: integer;
d:real;
begin
write('x1= '); readln(x1);
write('y1= '); readln(y1);
write('x2= '); readln(x2);
write('y2= '); readln(y2);
d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
writeln('d=',d);
end.
Доработаем программу, так чтобы она обладала некоторым интерфейсом.:
program example1;
var x1, x2, y1, y2: integer;
d:real;
begin
writeln('Эта программа вычисляет расстояние между двумя точками на плоскости');
writeln('Введите координаты двух точек:');
write('x1= '); readln(x1);
write('y1= '); readln(y1);
write('x2= '); readln(x2);
write('y2 ='); readln(y2);
d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
writeln('d= ',d);
writeln('нажмите Enter для завершения работы программы');
readln;
end.
Контрольные вопросы:
- Каковы назначение и возможности системы Borland Pascal?
- Как запустить программу на трансляцию и выполнение?
- Как записываются операторы начала и конца программы?
- Из каких разделов состоит программа на языке Pascal?
- В какой последовательности должны быть записаны разделы программы на языке Pascal?
- Как записываются операторы вывода на экран в Pascal?
Задачи:
- Дана длина ребра куба. Найти объем куба и площадь его боковой поверхности.
- Три сопротивления R1, R2, R3 соединены параллельно. Найти сопротивление соединения.
- Определить время падения камня на поверхность земли с высоты h.
- Известна длина окружности. Найти площадь круга, ограниченного этой окружностью.
- Треугольник задан координатами своих вершин. Найти:
- периметр треугольника;
- площадь треугольника.
- Вычислить высоту треугольника, опущенную на сторону а, по известным значениям длин его сторон a, b, c.
- Вычислить объем цилиндра с радиусом основания r и высотой h.
- Определить расстояние, пройденное физическим телом за время t, если тело движется с постоянным ускорением а и имеет в начальный момент времени скорость V0
- Вычислить площадь треугольника по формуле Герона, если заданы его стороны.
- Определить координаты вершины параболы y=ax2+bx+c (a№0). Коэффициенты a,b,c заданы.
- По данным сторонам прямоугольника вычислить его периметр, площадь и длину диагонали.
Задачи повышенной сложности
- Студент начал решать задачи данного урока программирования, когда электронные часы показывали h1 часов и min1 минут, а закончил, когда было h2 часов и min2 минут. Составьте программу, позволяющую определить, сколько времени студент решал эти задачи. (Будем считать, что задачи решались не дольше суток.)
- Дано действительное число а. Не пользуясь никакими другими операциями, кроме умножения, получить:
а) а4 за две операции; б) а6 за три операции; в) а7 за четыре операции; г) а8 за три операции; д) а9 за четыре операции; е) а10 за четыре операции; ж) а13 за пять операций; з) а15 за пять операций; и) а21 за шесть операций; к) а28 за шесть операций; л) а64 за шесть операций;
- Найти максимум и минимум двух натуральных чисел не используя ветвления алгоритма.
Назад
На главную
Нет комментариев.
Оставить комментарий:
|