8. Программирование линейных структур
Пример: Вычислить периметр и площадь прямоугольника со сторонами a и b при вводе длин сторон с клавиатуры.Алгоритм программы представлен на рисунке.
Текст программы на Паскале:
Program pl-perim;
{описание переменных}
Var s,p,a,b,c: real;
begin
{ввод данных}
writeln(‘введите длины сторон’);
write(‘a=’);
readln(a);
write(‘b=’);
readln(b);
{расчет периметра}
p:=2*(a+b);
{расчет площади}
s:=a*b;
{вывод на экран результата}
writeln(‘s=’,s);
write('p=',p)
end.