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