Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Free Pascal Что нового в FPC-3.0.0? Было бы очень интересно услышать обсуждение новшеств FPC-3.0.0 и его отличий от FPC-2.6.4. На эту тему, даже на официальном сайте, удаётся найти только отрывочную информацию. Например, работа с русскими именами файлов и каталогов, есть ли необходимость использовать функции UTF8ToSys() или UTF8Length() и аналогичные, так же где-то встречал, что теперь поддерживается виртуальная Java-машина и... https://www.cyberforum.ru/ free-pascal/ thread1618454.html Кто от кого получил подарок? Free Pascal
Здравствуйте. Помогите решить такую вот интересную задачку(заранее спасибо): Петя сам решил понаблюдать за процессом обмена подарками между своими друзьями, оставаясь в стороне. Он пронумеровал всех своих друзей целыми числами от 1 до n. Петя запомнил, что друг с номером i подарил подарок другу с номером pi. Он также запомнил, что каждому из его друзей достался ровно один подарок. Теперь для...
Free Pascal Программа для вывода слов с заданной буквой https://www.cyberforum.ru/ free-pascal/ thread1617779.html
Дана строка. Вывести слова с заданной буквой.
Free Pascal Найти ошибку в неуправляемом движении по двумерному массиву uses wingraph,wincrt; const n=20; leftbar=150; rightbar=166; up=#72; down=#80; enter=#13; left=#75; https://www.cyberforum.ru/ free-pascal/ thread1617644.html
Для заданной матрицы А сформировать одномерный масс сив B, содержащий суммы максимальных и минимальных элемент Free Pascal
Для заданной матрицы А сформировать одномерный массив B, содержащий суммы максимальных и минимальных элементов соответствующих столбцов матрицы.
Free Pascal Вычисление суммы ряда с заданной точностью *Для 10 значений Х, изменяющегося от -А до А (А задано) с постоянным шагом, вычислить с точностью eps значение суммы S=1+\frac{x}{1!}+\frac{{x}^{2}}{2!}+...+\frac{{x}^{n}}{n!}+... Результат вычисления каждой суммы записать в массив. https://www.cyberforum.ru/ free-pascal/ thread1617304.html
Free Pascal Определить план выпуска продукции, обеспечивающий наибольшую суммарную прибыли Требуется определить план выпуска продукции, обеспечивающий наибольшую суммарную прибыл: Цех выпускает два вида продукции: 1 и 2.Для производства единицы продукции вида 1 требуется А1 деталей типа А и А2 деталей типа В, а вида 2 - А3 деталей типа А и А4 деталей типа С. На складе имеется соответственно P,M и N деталей типа А,В и С. Прибыль от реализации единицы продукции 1 и 2 составляет... https://www.cyberforum.ru/ free-pascal/ thread1617278.html Free Pascal Напишите функцию быстрого возведения в степень
Друзья, помогите решить эту задачу, через функцию С объяснения, если можно. Заранее спасибо Напишите функцию быстрого возведения в степень. Количество действий должно быть пропорционально двоичному логарифму n. Входные данные Вводится 2 числа - a (вещественное) и n (целое неотрицательное). Выходные данные Необходимо вывести значение an.
Free Pascal Степень с отрицательным показателем https://www.cyberforum.ru/ free-pascal/ thread1616917.html
Друзья, помогите решить эту задачу, через функцию С объяснения, если можно. Заранее спасибо Напишите рекурсивную функцию, возводящую число a в степень n. Гарантируется, что все числа "помещаются" в стандартные вещественные (a и ответ) и целые (n) типы. Входные данные Вводится 2 числа - a и n (число n может быть отрицательным). Выходные данные Необходимо вывести значение an
Free Pascal Числа Фибоначчи Друзья, помогите решить эту задачу, через функцию С объяснения, если можно. Заранее спасибо 1)Последовательность Фибоначчи определена следующим образом: φ0=1, φ1=1, φn=φn-1+φn-2 при n>1. Начало ряда Фибоначчи выглядит следующим образом: 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, ... Напишите функцию function phi (n:integer): integer, (Pascal), которая по данному натуральному n возвращает φn.... https://www.cyberforum.ru/ free-pascal/ thread1616916.html
Фибоначчи, степень с отрецательным показателем, быстрый степень Free Pascal
Друзья, помогите решить эти задачи, через функции С объяснения, если можно. Заранее спасибо 1)Последовательность Фибоначчи определена следующим образом: φ0=1, φ1=1, φn=φn-1+φn-2 при n>1. Начало ряда Фибоначчи выглядит следующим образом: 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, ... Напишите функцию function phi (n:integer): integer, (Pascal), которая по данному натуральному n возвращает φn....
Free Pascal Дана матрица А размерностью N х N элементов целого типа из диапазона от 0 до 255 https://www.cyberforum.ru/ free-pascal/ thread1615975.html
Дана матрица А размерностью N х N элементов целого типа из диапазона от 0 до 255. Не используя вспомогательных массивов и не изменяя порядка следования элементов в матрице А установите, можно ли граничными элементами матрицы заполнить внутреннюю ее часть: граничные элементы при заполнении могут использоваться неоднократно.
Модератор
Эксперт Pascal/DelphiЭксперт NIX
7769 / 4598 / 2823
Регистрация: 22.11.2013
Сообщений: 13,077
Записей в блоге: 1
30.12.2015, 11:24 0

Выведите количество пострадавших драконов - Free Pascal - Ответ 8564995

30.12.2015, 11:24. Показов 2267. Ответов 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;


Вернуться к обсуждению:
Выведите количество пострадавших драконов Free Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.12.2015, 11:24
Готовые ответы и решения:

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

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

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

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

5
30.12.2015, 11:24
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.12.2015, 11:24
Помогаю со студенческими работами здесь

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

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

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

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

Выведите минимальное количество перемещений
3. Шашлыки Имя входного файла input.txt Имя выходного файла output.txt Максимальное время...

Выведите количество идеальных свитеров
Программист Борис хочет купить себе свитер. Разумеется, с оленями. После долгого изучения...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru