МНОГО БАЛЛОВ!помогите решить задачу,задача по программированию (pascal abc)сборник златопольского задача 1.44 даны стороны прямоугольника,найти его периметр и длину диагонали
Var a,b,p,d:integer;beginwriteln('введите стороны прямоугтльника');readln(a,b);p:=(a+b)*2;d:=sqrt(sqr(a)+sqr(b));writeln('периметр ',p,' диоганаль ' ,d);end.
Answers & Comments
Verified answer
Var a,b,p,d:integer;beginwriteln('введите стороны прямоугтльника');readln(a,b);p:=(a+b)*2;d:=sqrt(sqr(a)+sqr(b));writeln('периметр ',p,' диоганаль ' ,d);end.