Вопрос по информатике:
Задача по ИНФОРМАТИКЕ.Паскаль
Люди добрые,помогите решить задачу пожалуйста,завтра зачёт по информатике,нужно эту задачу решить.Вот условие:
Вывести на экран все трехзначные числа,сумма квадратов цифр которых равна 105.
Убедительная просьба,решить через mod,версия паскаля pascalABC.NET
- 23.11.2015 08:57
- Информатика
- remove_red_eye 5830
- thumb_up 43
Ответы и объяснения 1
Var i: integer;
begin
for i:=100 to 999 do
begin
if sqr(i mod 10)+sqr(i div 10 mod 10)+sqr(i div 100)=105
then
writeln(i);
end;
end.
_____________
Вывод:
458
485
548
584
845
854
- 24.11.2015 10:46
- thumb_up 11
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.