Вопрос по информатике:
Напишите на паскале (АВС). Задание: Среди всех четырехзначных натуральных чисел вывести на экран "особо счастливые", у которых сумма цифр в четных разрядах равна сумме цифр в нечетных.
Пожаловаться
- 08.02.2018 10:48
- Информатика
- remove_red_eye 14128
- thumb_up 18
Ответы и объяснения 1
var i,j,k,l:integer;
begin
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
for l:=0 to 9 do
if i+k=j+l then writeln(i*1000+j*100+k*10+l);
end.
Результат:1001
1012
1023
...
9977
9988
9999
begin
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
for l:=0 to 9 do
if i+k=j+l then writeln(i*1000+j*100+k*10+l);
end.
Результат:1001
1012
1023
...
9977
9988
9999
Пожаловаться
- 09.02.2018 04:17
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы