Допоможіть написати програму мовою Паскаль за цією задачою! На одному маленькому квадратному безлюдномуострові зі стороною а м. перебували к Робінзонів. Чи не порушені їхні права на житло, якщо на кожного Робінзона повино придбати S м^2 площі острова? Скільком новим Робінзонам ще вистачить місця на острові?
program a; var k:integer; a,s:real; begin readln('a= ',a); readln('k= ', k); readln('s= ',s; n=int(a*a/s-k); writeln('Осталось место для ', n, ' робинзонов'); readkey; end.
