Владислав Макаренко:

ну я додумался только к 10 9 и 8 больше не получается. вот задача:

uses charis;
begin
  rs(n);ds(n);ls(n);us(n);
  rds(n);l;lus(n-1);d;rds(n-2);l;lus(n-3);d;rds(n-4);l;lus(n-5);d;rds(n-6);l;lus(n-7);d;rds(n-8);l;lus(n-9);jz;rd(n);u;
  lus(n-1);r;rds(n-2);u;lus(n-3);r;rds(n-4);u;lus(n-5);r;rds(n-6);u;lus(n-7);r;rds(n-8);l;lus(n-9);
  pause;
end.

 

Вы выходите за пределы Экрана.

Я выкладывал исходник Charis.pas - возьмите его в процедуре prepareSpace вместо dx,dy := 10 присвойте например 70 и 70 - сразу станет понятно что рисуется лишнего.

для N=2:


Все тесты я проверил уже второй раз, там все хорошо. 

Все тесты я проверил уже второй раз, там все хорошо. 

Михаил Долинский :

Может есть смысл изменить эти числа в самом модуле? Для всех?
 

Там отсутп 10 стоит, по нему уже должно быть видно что пошло смещение в отрицательную плоскость.  

Не думаю что стоит - это будет путать на начальном этапе - тех кто не забрался так глубоко.
Вопрос, что можно сделать чтобы Чарис падал при входе в отрицательные координаты. Это можно подумать: чтобы была диагностика на раннем этапе. 

Владислав Макаренко:

Andrey Logvinenko:

Не понимаю почему это не оказалось очевидным,если не сложно, расскажите ваш ход мыслей. 

Я сначала заметил из вашего рисунка что надо 7 прыжков чтобы можно было писать а потом просто писал  

А точно ли 7? Почему для теста 1- нужно 0, а для 10-нужно 7-мь? 

А точно ли 7? Почему для теста 1- нужно 0, а для 10-нужно 7-мь? 

А вот за такую его ошибку даже мне стыдно, как его учителю Он конечно мог и должен был догадаться сам до этого. 

Какое-то ощущение что нет понимания, что такое тестирование, что это проверка решения на разных входных данных, как будто когда сдается задача из обычного курса где надо рассчитать x+y - она проверяется магическим образом что возвращает сумму. А не проверка не тестовых воздействиях. 

Хотелось бы чтобы еще одна независимая команда попробовала решить эту задачу. Мне не оставляет ощущение что этот случай единичный.  

ps: и подсказывать не хочется в лоб. Завтра ребята в 14 - будут, когда я подойду? Может посидеть вместе подумать? 

С ребятам пообщался - сами нашли решение, понадобилось минут 5. Почему это нельзя было сделать без меня - вопрос. 

Кстати - не все понимают что можно использовать все возможности паскаля, "А что можно использовать if"? Данная задача и без if решалась, но...  

У меня небольшая идея - попытаться сделать набор задачек в чярисе на условия, и еще один на процедуры. Чтобы ту же пилу они по аналогии делали через вызов. 

То есть по ходу чяриса вводить не только новые элементы чяриса но вводить постепенно паскаль. 

- Мой подход к обучению - "научить учиться", и поэтому я стараюсь сделать так, чтобы ученики
.... как можно больше работали самостоятельно
.... и каждый ученик работал намного больше учителя 

У меня небольшая идея - попытаться сделать набор задачек в чярисе на условия, и еще один на процедуры. Чтобы ту же пилу они по аналогии делали через вызов. 

Поддерживаю. По-моему мнению, и ввод/вывод, и переменные надо тоже вводить (а не через функции M N как у тебя это изначально было).
 

uses charis;
begin
  rs(n);ds(n);ls(n);us(n);

  rds(n);
  for i:=1 to n-n div 2 do begin l;lus(n-i*2+1);d;rds(n-i*2);end;
  jz;rds(n);
  for i:=1 to n-n div 2 do begin u;lus(n-i*2+1);r;rds(n-i*2);end;
  pause;
end.

Вообще было бы интересно на этом этапе привлечь ребят чтобы каждый предложил по своей задаче. И сделать отдельный подраздел со "своими" задачами - это очень интересный стимул им - увидеть свое имя в авторах задачи, и очень интересный опыт - заставить их думать о том что она вкладывают в задачу. 

Объясните пожалуйста мне как в задаче исправить цикл чтобы она могла работать и к нечётным n

ЧЯРис\8. Задачи на заливку\1 - "Создать Квадрат" 193709 Andrey Logvinenko

http://dl.gsu.by/differentialStudy.jsp?dSid=1195

uses charis;
begin
  rs(n);ds(n);ls(n);us(n);

  rds(n);
  for i:=1 to n-n div 2 do begin l;lus(n-i*2+1);d;rds(n-i*2);end;
  jz;rds(n);
  for i:=1 to n-n div 2 do begin u;lus(n-i*2+1);r;rds(n-i*2);end;
  pause;
end.

 

Они должны поставить задачу на DL непосредственно?
Тогда нужна инструкция от тебя и вспомогательные модули.
Лучше на DL положить её и программы тогда, а здесь ссылки.