Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Derzky
0 / 0 / 0
Регистрация: 01.12.2015
Сообщений: 120
1

Выведите количество пострадавших драконов

19.12.2015, 12:08. Просмотров 1001. Ответов 5
Метки нет (Все метки)

Помогите решить такую задачку, а то не понимаю.. Буду очень благодарен

Принцесса считала драконов. Впрочем, считать драконов просто так тоже было скучно, поэтому она развлекалась как могла. Этой ночью она представляла, что все посчитанные драконы явились сюда, чтобы ее украсть, а она отбивается от них, как может. Каждого k-ого дракона она била сковородкой по морде. Каждому l-ому — прищемляла хвост балконной дверью. Каждому m-ому — наступала на лапу острым каблучком. Наконец, каждому n-ому она грозила позвать мамочку, и он в ужасе ретировался.
Скольким воображаемым драконам успела нанести моральный или физический ущерб принцесса, если всего она насчитала d драконов?

Входные данные
Входные данные содержат целые числа k, l, m, n и d, каждое число в отдельной строке (1 ≤ k, l, m, n ≤ 10, 1 ≤ d ≤ 105).

Выходные данные
Выведите количество пострадавших драконов.

Примеры тестов

входные данные
1
2
3
4
12
выходные данные
12

входные данные
2
3
4
5
24
выходные данные
17
Примечание
В первом примере каждый первый дракон был жестоко бит сковородкой. Некоторым доставалось также от дверей и каблучков, но даже сковородки хватало всем.

Во втором примере неповрежденными остались драконы 1, 7, 11, 13, 17, 19 и 23.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.12.2015, 12:08
Ответы с готовыми решениями:

Запрос на расшифровку файлов, пострадавших от вируса better_call_saul
Добрый день. Прошу вас помочь с расшифровкой файлов, пострадавших от вируса better_call_saul. ...

Подсчитайте количество нулей среди введенных чисел и выведите это количество
Есть задача, никак не могу понять, как принимать различное количество строк во входных данных: ...

Массовое отравление в Инзе: 63 пострадавших, среди них 60 детей
Ссылка на новость: http://73online.ru/readnews/26752/ Возникает вопрос что делать, если...

Выведите на экран прямоугольник из нулей. Количество строк вводит пользователь, количество столбцов равно 5
Выведите на экран прямоугольник из нулей. Количество строк вводит пользователь, количество столбцов...

5
Новичок
Модератор
1585 / 1045 / 479
Регистрация: 17.07.2012
Сообщений: 5,217
Завершенные тесты: 3
20.12.2015, 02:51 2
Цитата Сообщение от Derzky Посмотреть сообщение
Наконец, каждому n-ому она грозила позвать мамочку, и он в ужасе ретировался.
1
bormant
Модератор
Эксперт Pascal/DelphiЭксперт NIX
5311 / 3167 / 2343
Регистрация: 22.11.2013
Сообщений: 8,948
20.12.2015, 10:50 3
Задачка сводится к подсчету в диапазоне [1..d] количества чисел, которые не делятся на хотя бы одно из k, l, m, n.
0
Derzky
0 / 0 / 0
Регистрация: 01.12.2015
Сообщений: 120
30.12.2015, 11:07  [ТС] 4
bormant, можешь сказать как это сделать?

Добавлено через 7 минут
Pascal
1
2
3
4
5
6
7
8
9
var
 d, k, l, m, n, t, i: integer;
Begin
 Read(k,l,m,n,d);
 t:=0;
 for i:=1 to d do
 if (i mod k<>0) or (i mod l<>0) or (i mod m<>0) or (i mod n<>0) then inc(t);
 Writeln (t);
End.
Так?
0
bormant
Модератор
Эксперт Pascal/DelphiЭксперт NIX
5311 / 3167 / 2343
Регистрация: 22.11.2013
Сообщений: 8,948
30.12.2015, 11:24 5
Лучший ответ Сообщение было отмечено Derzky как решение

Решение

Derzky,
там вопрос противоположный был, скольким досталось, то есть:
Pascal
1
if (i mod k=0) or (i mod l=0) or (i mod m=0) or (i mod n=0) then inc(t);
и скорее всего 1<=d<=105, то есть
Pascal
1
2
var
  d, i: Longint;
1
Derzky
0 / 0 / 0
Регистрация: 01.12.2015
Сообщений: 120
30.12.2015, 11:30  [ТС] 6
Спасибо, с наступающим тебя!
0
30.12.2015, 11:30
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.12.2015, 11:30

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Задача про драконов
Условие: У каждой S-ножки 1 голова. Найти количество ног N у K-главого дракона, если у всех...

Мумия 3: Гробница Императора Драконов
Посмотрел буквально вчера. Главное - спецэффекты при весьма слабом и предсказуемом сюжете :umnik:...

Задача принцесса калечит драконов
«Раз дракон. Два дракон. Три дракон», — считала принцесса. У нее была бессонница, а считать...

Выведите количество делителей N
На вход программе поступает целое число N. Выведите количество делителей N. включая 1 и само число...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.