Найти площадь и периметр прямоугольника , если известно его ширина а, а длина b в 3 раза больше ширины
Ответы на вопрос
Ответил Giammy
0
//PascalABC.NET
//Версия 3.3. сборка 1583 (25.11.2017)
begin
var a:=ReadInteger('Введите ширину: ');
Writeln('P=',2*(a+a*3),', S=',a*a*3);
end.
Пример:
Введите ширину: 2
P=16, S=12
//Версия 3.3. сборка 1583 (25.11.2017)
begin
var a:=ReadInteger('Введите ширину: ');
Writeln('P=',2*(a+a*3),', S=',a*a*3);
end.
Пример:
Введите ширину: 2
P=16, S=12
Новые вопросы