Решить информатику. участок имеет форму прямоугольника со стороной 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