pascal
program Rectangle;
var
a, b, area, perimeter: real;
begin
writeln('Введите длину первой стороны:');
readln(a);
writeln('Введите длину второй стороны:');
readln(b);
area := a * b;
perimeter := 2 * (a + b);
writeln('Площадь прямоугольника: ', area:0:2);
writeln('Периметр прямоугольника: ', perimeter:0:2);
end.
cpp
#include
using namespace std;
int main() {
double a, b, area, perimeter;
cout << "Введите длину первой стороны: ";
cin >> a;
cout << "Введите длину второй стороны: ";
cin >> b;
area = a * b;
perimeter = 2 * (a + b);
cout << "Площадь прямоугольника: " << area << endl;
cout << "Периметр прямоугольника: " << perimeter << endl;
return 0;
}