Вопрос по информатике:
Среди всех трёхзначных чисел (отрицательных и положительных) найти и выписать на экран те, у которых произведение крайних цифр совпадает с кубом средней цифры.
Пожаловаться
- 11.02.2017 03:46
- Информатика
- remove_red_eye 19922
- thumb_up 25
Ответы и объяснения 1
Var i,c:integer;
begin
for i:=100 to 999 do
begin
c:=i div 10 mod 10;
if (i div 100)*(i mod 10)=c*c*c then writeln(-i,' ',i);
end;
end.
Результат:
-100 100
-111 111
-128 128
-200 200
-224 224
-300 300
-339 339
-400 400
-422 422
-500 500
-600 600
-700 700
-800 800
-821 821
-848 848
-900 900
-933 933
begin
for i:=100 to 999 do
begin
c:=i div 10 mod 10;
if (i div 100)*(i mod 10)=c*c*c then writeln(-i,' ',i);
end;
end.
Результат:
-100 100
-111 111
-128 128
-200 200
-224 224
-300 300
-339 339
-400 400
-422 422
-500 500
-600 600
-700 700
-800 800
-821 821
-848 848
-900 900
-933 933
Пожаловаться
- 12.02.2017 21:50
- thumb_up 30
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы