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