Перейти к содержанию

Задача


Deadman

Рекомендуемые сообщения

Задача: найти четырехзначное число, при делении которого на 6 остаток 1, на 7 остаток 2, на 8 остаток 3, на 9 остаток 4, при этом сумма двух первых чисел равна сумме двух последних

Кто первый найдет максимально правильный ответ с решением, тому 50 баллов :rolleyes:

Ссылка на комментарий
Поделиться на другие сайты

Ну у меня 2 получилось 2011 и 6547.

Решал так:

$num = 1000;
while($num < 10000) {

$val1 = $num/6;
$val1 = preg_replace("#^(.+?)(\.)(.+?)$#is","\\1",$val1);
$val1 = $val1 * 6 + 1;
$val2 = $num/7;
$val2 = preg_replace("#^(.+?)(\.)(.+?)$#is","\\1",$val2);
$val2 = $val2 * 7 + 2;
$val3 = $num/8;
$val3 = preg_replace("#^(.+?)(\.)(.+?)$#is","\\1",$val3);
$val3 = $val3 * 8 + 3;
$val4 = $num/9;
$val4 = preg_replace("#^(.+?)(\.)(.+?)$#is","\\1",$val4);
$val4 = $val4 * 9 + 4;


if($val1 == $num and $val2 == $num and $val3 == $num and $val4 == $num) {
	$num1 = substr($num,0,1);
	$num2 = substr($num,1,1);
	$num3 = substr($num,2,1);
	$num4 = substr($num,3,1);
	$first = $num1 + $num2;
	$second = $num3 + $num4;
	if($first == $second) {
			echo $num;
			echo "\r\n";
	}
	
}

$num = $num + 1;

}

Сори за нубский код - спать уже хочу )

Изменено пользователем vit9696
Ссылка на комментарий
Поделиться на другие сайты

Оно же на шарпе

using System;

class Program
{
static void Main(string[] args)
{
	for (int i = 1000; i < 10000; i++)
	{
		if (i % 10 + (i / 10) % 10 == (i / 100) % 10 + (i / 1000))
		{
			if (i % 6 == 1 && i % 7 == 2 && i % 8 == 3 && i % 9 == 4)
			{
				Console.WriteLine(i);
			}
		}
	}
}
}

Ссылка на комментарий
Поделиться на другие сайты

Пожалуйста, войдите, чтобы комментировать

Вы сможете оставить комментарий после входа в



Войти
  • Похожий контент

    • sencity72
      Автор sencity72
      Вирус подменяет диспетчер задач - при открытии видно нагрузка ЦП, спустя секунду диспетчер задач превращется в статичную картинку с меньшими показателями нагрузки - антивирусы не помогают.
      CollectionLog-2025.06.16-08.28.zip
    • Mashin
    • Mashin
      Автор Mashin
      Уже месяц борюсь с этой проблемой. Много чего перепробовал. Проверял множеством антивирусов и каждый ничего не нашел.
    • crabcorner
      Автор crabcorner
      Столкнулся с проблемой, подхватил самовостонавливающийся майнер делающий это через планировщик задач. Майнер успешно удалил через стороннюю утилиту заменяющею его, но оригинальная программа до сих пор не работает. Так же как выяснилось майнер заблокировал весь раздел "управление компьютером". И из-за этого доставляет мне большие проблемы. Помогите в восстановлении Планировщика и остального раздела.
    • svnfei
      Автор svnfei
      Вечером пришлось лечиться от вируса, все было сделано правильно и после перезагрузки возникли проблемы с отображением ярлыков на панели задач. Это касалось только телеграмма и параметры. И если телеграм удалось починить, то с параметрами до сих пор такие вот проблемы. 
      Главное в панели задач параметры - черный квадрат, но если смотреть через пуск, то там стандартная иконка шестеренки.
       
×
×
  • Создать...