Делим фигуру на 2 прямоугольника.
1 треугольник: a=3,b=12;
2 треугольник: a=3,b=6;
Формула периметра: P=(a+b)*2
1) (3+12)*2= 15*2 = 30 (см)
2) (3+6)*2= 9*2 = 18 (см)
3) 30+18=48(см)
Ответ: P фигуры = 48 см
Program pr1;
var
x:byte; // Число
y:real; // Функци
Begin
x:=17;
writeln('y= ',SQRT(x+8));
End.
Дальше просто замени другими значениями x
Переменная "c" после выполнения этого кода будет: 32