Информатика, опубликовано 2018-08-22 22:36:00 by Гость
Программирование, 10 классPASCAL ABCНеобходимо написать код к заданию(как можно проще):Указать в диапазоне от a до b числа, сумма цифр которого совпадает с их произведением. Или сообщить об отсутствии таких чисел.Срочно!
Ответ оставил Гость
Const a=1; b=5;
Var i:integer;
Begin
for i:=a to b do
if i*i = i+i then
writeln(i);
readln;
end. Достаточно простой код
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на