Школа программиста

Забыли пароль?
[задачи] [курсы] [олимпиады] [регистрация]
Логин:   Пароль:    
Скрыть меню
О школе
Правила
Олимпиады
Фотоальбом
Гостевая
Форум
Архив олимпиад
Архив задач
Состояние системы
Рейтинг
Курсы
Новичкам
Работа в системе
Курсы ККДП
Дистрибутивы
Статьи
Ссылки


 
Вернуться
Тема: Числа Смита #793 Проверьте пожалуйста тесты!
1
  1  Максименко Илья, 23 июля 2016 г. 9:05:19
      Спасибо большое Павел, всегда так считывал, поскольку подобные задания например в тимусе решаются именно так.
Думаю стоит это упомянуть в разделе "Новичкам" или "Работа в системе"
  2  Хворых Павел, 22 июля 2016 г. 16:35:45
      Вы неправильно считываете числа

while not eof do
begin
read(d);
...
end;

Если после строки с числами есть пробел или перенос строки (а они появляются как раз в третьем тесте), то у вас отработает лишняя итерация, так как еще есть непрочитанные символы. Free Pascal в этом случае не вываливается с ошибкой, а присваивает переменной d ноль.
  3  Артурия Пендрагон, 22 июля 2016 г. 15:16:18
      git gud
v2 https://ideone.com/aNahyn
1

Чтобы оставить сообщение необходимо зарегистрироваться и авторизоваться!

Красноярский краевой Дворец пионеров, (c)2006 - 2026, ИНН 246305493507, E-mail: admin@acmp.ru