Том сойеру необходимо покрасить забор с двух сторон, - вопрос №2806933 от kakaha12 14.03.2021 01:22

Question

Информатика: Том сойеру необходимо покрасить забор с двух сторон, который содержит n досок. размеры каждой доски а * в (в метрах). на каждый квадратный метр доски расходуется с кг краски. каждая банка содержит d кг. тому сойеру определить количество банок краски, которые ему потребуются для покраски забора. входные данные: во входном потоке в первой строке через пробел заданы пять целых чисел (n, a, b, c, d = 1000). выходные данные: вывести единственное число. пример входного файла (input.txt): 10 1 1 2 3 пример

kakaha12 · Answer

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....