Написать алгоритм и программу решения следуa задачи длина прямоугольника а см а ширина на 5 см меньше найти периметр
Pascal Program Perimeter var a, b, p: real; begin readln(a); b := a - 5; P := 2*a + 2*b; Writeln(p); End. Алгоритм: вводим а, считаем b, затем получаем p и выводим его на экран.