написать в программе паскать: вычислить и напечатать длину стороны и длину диагонали квадрата, если его периметр равен 10,4 см

Question

Гость

Ответ(ы) на вопрос:

Accepted Answer

var p,d,n:integer; begin writeln('введите периметр'); readln(p); n:=p/4; d:=SQRT(n^2+n^2) writeln('сторона=',n); writeln('диагональ=,d); end.