Вопрос задан 01.04.2018 в 04:14. Предмет Информатика. Спрашивает Минский Арсений.

Допоможіть написати програму мовою Паскаль за цією задачою!На одному маленькому квадратному безлюдно

му острові зі стороною а м. перебували к Робінзонів. Чи не порушені їхні права на житло, якщо на кожного Робінзона повино придбати 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.

Последние заданные вопросы в категории Информатика

Информатика 03.06.2023 05:00 2 Ким Елена.
Ответов: 1