Переведите на C++
Var
number,i:integer;
answer:boolean;
Begin
Write('Введите число: ');
Readln(number);
answer:=false;
For i:=1 to number do
If number = i*(i+1)*(i+2) then Begin
answer:=true;
break
End;
If answer = true then writeln('Можно: ',number,' = ',i,'*',i+1,'*',i+2)
else writeln('Нельзя');
End.
Самые новые вопросы
Информация
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.