ENG  RUSTimus Online Judge
Online Judge
Задачи
Авторы
Соревнования
О системе
Часто задаваемые вопросы
Новости сайта
Форум
Ссылки
Архив задач
Отправить на проверку
Состояние проверки
Руководство
Регистрация
Исправить данные
Рейтинг авторов
Текущее соревнование
Расписание
Прошедшие соревнования
Правила
вернуться в форум

Обсуждение задачи 1073. Квадратная страна

递推能过..
Послано grayluck 22 сен 2009 06:19
for i := 2 to n do
    begin
      min:=maxlongint;
      for j := 1 to trunc(sqrt(i)) do
        if min>f[i-j*j] then
          min:=f[i-j*j];
      f[i]:=min+1;
    end;
Re: 递推能过..
Послано wzh597124104 21 янв 2011 13:16
发源代码是不好的行为