Составить 2 программы для расчета периметра и площади прямоугольника

Периметр:

{

int a, b;

cin >> a>>b;

a = (a*b) * 2;

cout << a <
return 0;

}

Площадь:

{

int a, b, c;

cin >> a>>b>>c;

a=a*b*c;

cout << a <
return 0;

}

Нахождение площади

var a, b, s:integer;

begin

writeln ('Введите A и B: ');

readln (a, b);

s:=a*b; / / формула

writeln ('Площадь прямоугольника равна: ', s);

end.

Нахождение периметра

var a, b, p:integer;

begin

writeln ('Введите A и B: ');

readln (a, b);

p:=2 * (a+b); / / формула

writeln ('Периметр прямоугольника равен: ', p);

end.

На паскале