Вывести на экран все номера шестизначных "счастливых" билетов

@Юлия598 · Регистрация: 20.06.2016

Author24 — интернет-сервис помощи студентам

Вывести на экран все номера шестизначных "счастливых" билетов (сумма 3х первых=сумме 3х последних чисел).

@m-ch · 06.06.2017, 19:04

Нужно вывести номера всех 55252 билетов?

@Юлия598 · 06.06.2017, 19:10 **[ТС]**

да.

@m-ch · 06.06.2017, 19:15

QBasic/QuickBASIC

DIM i AS LONG
FOR i = 0 TO 999999
    IF i MOD 10 + i \ 10 MOD 10 + i \ 100 MOD 10 = i \ 1000 MOD 10 + i \ 10000 MOD 10 + i \ 100000 THEN PRINT i
NEXT i

@Юлия598 0 / 0 / 0 Регистрация: 20.06.2016 Сообщений: 18
		1
	Вывести на экран все номера шестизначных "счастливых" билетов 06.06.2017, 16:42. Показов 781. Ответов 3 Метки нет (Все метки) Вывести на экран все номера шестизначных "счастливых" билетов (сумма 3х первых=сумме 3х последних чисел). 0

@m-ch 6172 / 937 / 310 Регистрация: 25.02.2011 Сообщений: 1,367 Записей в блоге: 1
	06.06.2017, 19:04	2
	Нужно вывести номера всех 55252 билетов? 0

@Юлия598 0 / 0 / 0 Регистрация: 20.06.2016 Сообщений: 18
	06.06.2017, 19:10 [ТС]	3
	да. 0

	06.06.2017, 19:15