Задача №1: Рассчитать площадь и периметр прямоугольника по двум известным сторонам.
Данная задача не должна представлять особой трудности, так как построена она на хорошо известных всем нам формулах расчета площади и периметра прямоугольника, поэтому зацикливаться на выведении этих формул мы не будем.
Составим алгоритм решения подобных задач:
1) Прочитать задачу.
2) Выписать известные и неизвестные нам переменные в «дано». (В задаче №1 к известным переменным относятся стороны: a,b ;к неизвестным — площадь S и периметр P)
3) Вспомнить либо составить необходимые формулы. (У нас: S=a*b; P=2*(a+b))
4) Составить блок-схему.
Запишем условие в более кратком виде.
Дано: a,b
Найти: S,P
Блок-схема:
Решение задачи №1
Структура программы, решающей данную задачу, тоже Описание переменных;
· 2) Ввод значений сторон прямоугольника;
· 3) Расчет площади прямоугольника;
· 4) Расчет периметра прямоугольника;
· 5) Вывод значений площади и периметра;
· 6) Конец.
begin
write('k = ');
read(x);
write('h = ');
read(h);
y := 2;
while y < 3 + 1E-9 do
begin
writeln('y = ', y, ', alpha = ', arccos(y / x) * 180 / pi : 0 : 3);
y := y + h;
end;
end.
Пример работы программы:
k = 5
h = 0.1
y = 2, alpha = 66.422
y = 2.1, alpha = 65.165
y = 2.2, alpha = 63.896
y = 2.3, alpha = 62.613
y = 2.4, alpha = 61.315
y = 2.5, alpha = 60.000
y = 2.6, alpha = 58.668
y = 2.7, alpha = 57.316
y = 2.8, alpha = 55.944
y = 2.9, alpha = 54.549
y = 3, alpha = 53.130