Сколько нужно рулонов обоев для оклейки комнаты - Pascal

  1. Сколько нужно рулонов обоев для оклейки комнаты длиной m метров, шириной n метров и высотой h метров, если ширина рулона k см, а длина 10 метров. Известны так же S1 и S2 – площади дверных и оконных проемов.


textual

Код к задаче: «Сколько нужно рулонов обоев для оклейки комнаты - Pascal»

var s,m,n,h,k,s1,s2 : Real;
begin
  Write('m ='); ReadLn(m);
  Write('n ='); ReadLn(n);
  Write('h ='); ReadLn(h);
  Write('k ='); ReadLn(k);
  Write('s1='); ReadLn(s1);
  Write('s2='); ReadLn(s2);
  s := (m*n*h-s1-s2)*10/k;
  if rount(s) < s then s := s + 1;
  WriteLn(Trunc(s) );
end.

СДЕЛАЙТЕ РЕПОСТ

9   голосов, оценка 4.222 из 5



Похожие ответы
  1. Нужно протабулировать функцию на интервале 1,5<=x<=12,5 с шагом. h=0,75

  1. Здравствуйте,помогите пожалуйста написать код.В городе Новые Васюки на некоторых дорогах введено одностороннее движение. Схема дорог задана в виде весовой матрицы графа, числа обозначают длины дорог. Если длины дорог из пункта А в пункт Б разные, это означает, что есть две разные дороги. Найдите отдельно количество дорог в Новых Васюках с односторонним и двусторонним движением. Входные данные В первой строке вводится количество перекрёстков в Новых Васюках N ( 1 ≤ N ≤ 1000 ). В следующих N строках записано по N чисел, разделённых пробелами – длины дорог между каждой парой перекрёстков. Ноль означает, что дороги между этими перекрёстками нет. Выходные данные Программа должна вывести два числа в одной строке, разделив их пробелом: сначала количество дорог с односторонним движением, потом – количество дорог с двусторонним движением. Примеры входные данные 5 0 2 3 4 0 2 0 5 0 7 3 6 0 8 0 0 0 0 0 0 0 7 0 9 0 выходные данные 5 3

  1. В расписании движения поездов по станции Масловка указаны: номера поездов , пункты следования, время прибытия и отправления, направления следования (южное, северное, западное, восточное). Сколько поездов следует в каждом из направлений?

  1. Ребят,помогите пожалуйста,будьте добры. Надо составить программки в Паскале. Составить математическую модель, таблицу идентификаторов и алгоритм для следующих задач: Задано n точек. Определить, сколько из них находится внутри прямоугольника.

  1. Буду очень признателен)C++1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 #include using namespace std;   int main() {     setlocale(0,""); // Чтобы корректно отображались русские буквы       cout << "Вычисление значения гиперболического синуса с точность eps = 0.01\n\n "          << "y = sh(x) = x + x^3/3! + ... + x^(2n+1)/(2n+1)! + ...\n\n";       double x;     cout << "Задайте x = ";     cin >> x;       double an = x, sum = an, eps = 0.01;     int i = 1;     while (abs(an) > eps)      { an *= (x*x)/(2*i*(2*i+1));        sum += an;        i++;      }       cout << "\n sh(" << x << ") = " << sum << endl;       system("pause > null");     return 0; }Если что, вот сама задача: Не используя стандартные функции (за исключением abs), вычислить с точностью eps > 0 у = shx = x + x3/3! + x5/5! +…+x2n+1/(2n + 1!) +…; Считать, что требуемая точность достигнута, если очередное слагаемое по модулю меньше eps, все последующие слагаемые можно уже не учитывать.

  1. Создайте программу, запрашивающую у пользователя 10 чисел. Если больше 4-х из них окажутся больше 10, выведите сообщение «Караул! Сейчас все взорвется». Иначе сообщите, сколько введенных чисел больше 10, а сколько больше 5.

  1. Нужно чтобы среди введенных чисел выбирал наибольшее и выводил его на экран. Помогите доделать.

  1. Для олимпиады нужно написать прогу, которая выводит цифры из предложения и сортирует их в порядке возрастания. Помогите прошу.

  1. Для школьной столовой нужно купить 155кг крупы. На складе имеются упаковки по 7, 12 и 15 кг. Сколько комплектов упаковок можно составить. Упаковки вскрывать нельзя.