Помогите решить информатику. Участок имеет форму прямоугольника со стороной R метров и площадью S м2. Рассчитать, сколько потребуется пролетов забора для ограждения участка, если длина пролета составляет Z метров.
Var r,s,z:integer; r2,p,k:real; begin writeln('Введите r, s и z:'); readln(r,s,z); r2:=s/r; p:=2*(r+r2); k:=p/z; writeln('k = ',k); end. Пример: Введите r, s и z: 4 20 2 k = 9