Том Сойеру необходимо покрасить забор с двух сторон, который содержит N досок. Размеры каждой доски А * В (в метрах). На каждый квадратный метр доски расходуется С кг краски. Каждая банка содержит D кг. Помогите Тому Сойеру опр...

Том Сойеру необходимо покрасить забор с двух сторон, который содержит N досок. Размеры каждой доски А * В (в метрах). На каждый квадратный метр доски расходуется С кг краски. Каждая банка содержит D кг. Помогите Тому Сойеру определить количество банок краски, которые ему потребуются для покраски забора. Входные данные: Во входном потоке в первой строке через пробел заданы пять целых чисел (N, A, B, C, D <= 1000). Выходные данные: Вывести единственное число. Пример входного файла (input.txt): 10 1 1 2 3 Пример выходного файла (output.txt): 14
Гость
Ответ(ы) на вопрос:
Гость
var   n, a, b, c, d: real; begin   try     assign(input, 'input.txt');     assign(output, 'output.txt');     reset(input);     rewrite(output);          read(input, n, a, b, c, d);     write(output, trunc(a * b * 2 * n * c / d) + 1);   finally     try       close(input);       close(output);     except            end;   end; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы