Begin 3 даны стороны прямоугольника a и b найти его площадь s =ab и периметр P=2(ab)

Begin 3 даны стороны прямоугольника a и b найти его площадь s =ab и периметр P=2(ab)
Гость
Ответ(ы) на вопрос:
Гость
var a, b, s, p: integer; begin read(a, b); s := a*b; p := 2 * (a+b); println('Периметр: '); println(p); println('Площадь: '); print(s); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы