Question

Паскаль
Найти площадь и периметр прямоугольника
Цифры любые
Заранее СПАСИБО

Answer 1

var a,b,s,p:integer;
begin
read(a,b);
s:=a*b;
println(s);
p:=2*(a+b);
println(p);
end.