Cherep666
01.05.2020 02:34

9. Запасы Ограничение времени 1 секунда
Ограничение памяти 256Mb
Ввод стандартный ввод или input.txt
Вывод стандартный вывод или output.txt
Баба-Яга летом делала запасы еловых шишек на зиму. За лето она насобирала k лукошек шишек. В каждом лукошке помещается n шишек. Делала она из них варенье. Получилось так, что в одну банку помещается варенье из m шишек. Сколько банок закатала бабуля?

Формат ввода
В единственной строке с входными данными записаны через пробел целые числа (в диапазоне от 1 до 10000): k, n, m.

Формат вывода
В выходной строке необходимо вывести число - количество получившихся банок.

Пример 1
Ввод Вывод
7 3 5
5
Пример 2
Ввод Вывод
1 6 3
2

Напишите программу на ОЧЕНЬ НАДОО

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
DarkMania
28.04.2020 09:48

Лишние словосочетание выделено жирным шрифтом :

а. Формирование у пользователей компьютера навыков грамотной постановки задач, возникающих в практической деятельности, для их решения с компьютера.

б. Формирование у пользователей компьютера навыков использования основных типов прикладных программ общего назначения для решения с их практических задач и понимания основных принципов, лежащих в основе этих систем.

в. Формирование у пользователей компьютера навыков печати десятипалым методом.

г. Формирование у пользователей компьютера умения грамотно интерпретировать результаты решения практических задач с компьютеров и применять эти результаты в практической деятельности.

0,0(0 оценок)
Ответ:
лиза5222
08.02.2020 12:08

program HelloWorld;

var a: array of integer;

var N, min, max, i, variable:integer;

begin

   min := 32767;

   max := 0;

   readln(N);

   for i := 0 to N do begin  

       readln(variable);

       if (variable > 0) and (variable mod 2 = 0) and (variable > max) then

           max := variable;

       if (variable > 0) and (variable mod 2 = 0) and (variable < min) then

           min := variable;

   end;

   if (max <> 0) and (min <> 32767) then

       writeln(min, ' ', max)

   else  

       writeln(-1);

end.

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