Найдите полграмму площади и пириметра

Var A,b,s,p:real;
begin
read (a b);
writeln (s=, a*b);
writeln (p=, 2*a+2*b);
end.
на примере прямоугольника

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку