Рассчитайте площадь и периметр прямоугольника в Паскале.(a-5, b-10)
begin
writeln ('Периметр = ', (5+10)*2);
writeln ('Площадь = ', 5*10);
readln;
end.