Помогите решить задачу по abc pascal даны стороны прямоугольника а и b. найдите периметр...

Question

Помогите решить задачу по abc pascal даны стороны прямоугольника а и b. найдите периметр и полщадь
S=a*b P=2*(a+b)
a=6.90 b=5.80
буду очень благодарна!

Answer 1

Var
a,b,p,s:real;
begin
  Writeln('Введите значение а = ');
  read(a);
  writeln('Введите значение b = ');
  read(b);
  s:=a*b;
  p:=2*(a+b);
  writeln('Площадь = ',s);
  Writeln('Периметр = ', p);
end.

Comments

S это знак площадь, а P периметр

---

Да