Вопрос по информатике:
Счастливым считается билет с 6 значным номером, у которого сумма первых 3 цифр равна сумме послед 3. Напечатать номера счастливых билетов.
Пожалуйста, решите, буду очень благодарна!
ПАСКАЛЬ, БЕЗ ВСЯКИХ СЛОЖНОСТЕЙ, НА ШКОЛЬНОМ УРОВНЕ 10 КЛАССА:)
- 14.02.2018 14:51
- Информатика
- remove_red_eye 15210
- thumb_up 62
Ответы и объяснения 1
var i:longint;
function sum(c:integer):integer
begin
sum := c mod 10 + c div 10 mod 100 + c div 100;
end
Begin
for i := 1 to 999999 do
if (sum(i div 1000) = sum(i mod 1000) ) then
writeln(i);
End
- 15.02.2018 18:42
- thumb_up 25
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.