uchenik0012
16.08.2021 05:38

с задачей на округление вверх (Паскаль)
1. Ваш любимый дядя – директор фирмы, которая делает евроремонты в офисах. В связи с финансово-экономическим кризисом, дядюшка решил оптимизировать свое предприятие.
Давно ходят слухи, что бригадир в дядюшкиной фирме покупает лишнее количество стройматериалов, а остатки использует для отделки своей новой дачи. Ваш дядя заинтересовался, сколько в действительности банок краски необходимо для покраски стены в офисе длиной L метров, шириной W и высотой H, если одной банки хватает на 16 метров квадратных, а размерами дверей и окон можно пренебречь? Заказов много, поэтому дядя по написать программу, которая будет все это считать.
Входные данные
Программа получает три числа L, W, H — длина, ширина и высота офиса в метрах соответственно, каждое число не превышает 1000.
Выходные данные
Необходимо вывести количество банок с краской, необходимых для окраски офиса.
Пример:
Входные данные Выходные данные
1 1 1 1
8710 19
278819 274
2. Кот Матроскин с друзьями решил отправиться путешествовать на теплоходе «Адмирал Крузенштерн». Известно, что этот теплоход рассчитан на N пассажиров, при этом на борту находится M человек команды и K человек обслуживающего персонала. Матроскина очень беспокоит безопасность путешествия. Поэтому первым делом он решил проверить количество шлюпок на борту. Оказалось, что на теплоходе находятся шлюпки, вмещающие в себя P человек Матроскину подсчитать количество шлюпок, которое должно быть на борту, чтобы в них можно было разместить всех людей, находящихся на пароходе.
Входные данные:
Вводятся 4 целых числа N, M, K, P (все числа не более 20000).
Выходные данные:
Необходимо вывести одно число – количество шлюпок.
Пример:
Входные данные Выходные данные
750 25 30 10 81
120 10 15 7 21
1256 65 79 14 100

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Aieks01
20.10.2022 00:11
Это рекурсивный вызов процедуры.  При первом вызове F(7)  по условию 
if n>1 then ...  будет вызов этой же процедуры    f(n div 2);  или  f(3),  далее,  т.к. 3>1,  то снова будет вызвана процедура  f(3 div 2)  или f(1),  теперь не выполняется условие  n>1,  следовательно, будет выполнен оператор      write ('**');  -  напечатаются две звездочки, после выхода из процедуры продолжится выполнение процедуры при втором вызове - будут напечатаны еще 2 звездочки, затем продолжится выполнение при первом вызове - еще будут напечатаны 2 звездочки.  В результате вызова f(7) будут напечатаны 6 звездочек  .
0,0(0 оценок)
Ответ:
GAFur1111
20.01.2023 14:48
//название
var n: integer;
begin
repeat
n:=readinteger('Введите порядковый номер: ');
until n in [1..52];

case (n mod 13) of 
1: write ('Двойка');
2: write ('Тройка');
3: write ('Четверка');
4: write ('Пятерка');
5: write ('Шестерка');
6: write ('Семерка');
7: write ('Восьмерка');
8: write ('Девятка');
9: write ('Десятка');
10: write ('Валет');
11: write ('Дама');
12: write ('Король');
0: write ('Туз');
end;
if n mod 13<>0 then n:=(n div 13) + 1 else n:=n div 13;

case n of
1: write (' бубен');
2: write (' черви');
3: write (' трефы');
4: write (' пики');
end;

end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота