Допоможіть написати програму мовою Паскаль за цією задачою! На одному маленькому квадратному безлюдному
10-11 класс
|
острові зі стороною а м. перебували к Робінзонів. Чи не порушені їхні права на житло, якщо на кожного Робінзона повино придбати 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.
Другие вопросы из категории
200.Все числа целые.Массив распечатать в одну строчку.Найти наибольший элемент.
автомобильный номер длиной в 7 символов
составляется из заглавных букв (всего
используется 26 букв) и десятичных цифр
в любом порядке. Каждый символ кодируется
одинаковым и минимально возможным
количеством бит. Каждый номер кодируется
одинаковым и минимально возможным
количеством байт. Определить объем
памяти для хранения 20 таких автомобильных
номеров.
Читайте также
дуже дуже треба. Буду безмежно вдячна
В країні Тріантафіло проживає садівник-бізнесмен Іван
Петрович. Іван Петрович чудовий садівник, але в бізнесі він початківець.
Займаючись квітковим бізнесом, він не завжди досягав позитивних результатів:
були і збитки і прибутки. Допоможіть Івану Петровичу визначити фінансовий стан
його фірми за 2 роки роботи.
Вхідні дані:
Вхідний потік
містить два цілих числа x, y по модулю не більше 1030: прибутки або збитки за
перший і другий роки роботи фірми.