Допоможіть написати програму мовою Паскаль за цією задачою! На одному маленькому квадратному безлюдному острові зі стороною а м. перебували к Робінзонів. Чи не порушені їхні права на житло, якщо на кожного Робінзона повино ...
Допоможіть написати програму мовою Паскаль за цією задачою! На одному маленькому квадратному безлюдному острові зі стороною а м. перебували к Робінзонів. Чи не порушені їхні права на житло, якщо на кожного Робінзона повино придбати 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.
Не нашли ответ?
Похожие вопросы